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QL Repairs 


Now containing the complete QL Toolkit soft ware as well as an easily used Ram-Drive 
device driver, the CST QDisc is the longest established and most widely used floppy disc 
controller for the QL computer. The QDisc interface may be used with virtually any 3.5” 
or 5.25” floppy disc drives including, of course, CST's dual slim-line 720K (1 Megabyte 
unformatted) high performance, 80 track double sided drives. The Toolkit software 
provides a wide range of SuperBASIC commands and functions designed to allow the 
full power of the QL to be realised without resorting to machine code programming, 
giving access to job control, random access I/O, character sets, wild card file handling 
and so on. The Toolkit is included in the QDisc firmware, so it is ready for use as soon as 
the system is switched on, as is the Ram-drive device driver, which allows any unused 
memory to be used as a high speed storage medium, ideal for temporary results, and 
for saving screen images for high speed displays. Naturally the Ram-drive may be used 
to maximum advantage when used on a QL with additional memory such as the RAM- 
plus. 


Expanding the QL's memory from 128K to the maximum 640K, the CST RAM-plus is 
based on the latest 256K DRAMs to give full speed no wait-state operation and is 
housed in an elegant aluminium case which matches the QL and provides an expansion 
port allowing a peripheral interface, such as a QDisc floppy or Winchester controller to 
be plugged in. Adding high speed memory to the QL has several advantages: all QL 
programs run faster, including ones that make heavy use of disc or microdrive as QDos 
uses spare memory for buffering data; increased data space is available for 
SuperBASIC, Psion and other application packages and the QL's multitasking ability is 
greatly enhanced by the ability to load several large programs simultaneously. The 
extra memory can also be used to advantage with the Ram-drive firmware supplied 
with the QDisc. For customers who have already purchased an earlier QDisc controller, 
the Ram-drive software can be supplied on floppy disc at a small charge. 


The flagship of the CST fleet of storage devices for the QL is the 20 Megabyte 
Winchester drive with integral floppy drive. The system is housed in a compact metal 
case with integral power supply and is interfaced to the QL by a small controller card. 
The floppy specification is the same as the standard QDisc; the Winchester is a high 
performance drive unit based on the new SCSI standard, which allows up to eight drives 
to be connected to one QL (available to special order). The Winchester firmware is fully 
compatible with standard microdrive and floppy QDos drivers, and also supports 
heirarchical directories and file date stamping. The directory structure allows files to be 
separated into compartments; for example, programs can be held in one directory 
while data for various projects can be held in other directories. This is essential when a 
disc can hold over 1000 files! Date stamping of files is used to keep a record of the last 
time every file on the Winchester was. accessed, modified or backed up. This allows the 
Data Management Utility supplied with the system to archive only those files which 
have been changed since the last backup was performed. This greatly reduces the time 
taken to perform regular backups. 


Cambridge Systems Technology 
24 Green Street, Stevenage, Herts SG1 3DS 
Telephone: Stevenage (0438) 352150 


Please supply the following items: 


iol 


Prices are inclusive of VAT, postage and packaging in the UK only 
CST reserve the right to alter prices and specifications without prior notice 


QDisc Interface including ram drive 


Name 


[_];QDisc Interface including ram drive (3.5”) £79.95 || Address 


(5.25") £79.95 


Dual 720K 3.5” Floppy Disc Drives: £219.95 
RAM-plus 512K Memory Expansion: £139.95 
QDisc + Dual Floppy Drive: £275.00 
QDisc + RAM-plus + Dual Floppy Drive: £405.00 


20Mb Winchester with floppy: 


20Mb Winchester, floppy + RAM-plus: £1280.00 
|__| Q488 IEEE GPIB interface: 


QEP-III Eprom Programmer: 


Information on: 


£1150.00 | Post Code ______________ Telephone 


£224.25 | enclose a cheque/PO for £ 


£115.00 | Please deduct my Access/Mastercard/Eurocard/Diners Club a/c 


Utility disc including ram drive (3.5"): £10.00 PO Pn a | | a 
= Utility disc including ram drive (5.25"): £10.00 Card No. 


Expiry Date 


Signature 
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ABC Electronic have produced the 
first add-on sound board for the QL. 


QL Comms. 


Mike James assesses the 
communications capability of the QL 
and reviews the new Astracom 1000. 


Plus 

Eye-Q; Digital Precisions new graphics 
package, the Q-XT 640 - Sandy's QL 
upgrade, screen dumps compared. 


NEW TALENT RELEASES! 


Get the most from your QL with these latest TALENT programs — a CAD 
package for professional designers, an Assembler/Disassembler for machine 
code programmers and an addictive arcade game for everybody! 


A two-dimensional CAD package suitable for all general, 
scientific and engineering applications. Create accurate, 
finely detailed plans, diagrams or designs and print 


them out to any width on your Epson printer. _., 
You'll find TECHNIQL ; by Eddy Yeung 
A complete set of tools — everything you need to write, 


extremely easy to use 
and capable of edit and debug programs written in Assembly code. 
Compact, elegantly designed and easy to use. 


producing top- 
Three main program modules: 


quality professional 
results. 

@ FULL SCREEN EDITOR 

@ ASSEMBLER 
@ MONITOR & DISASSEMBLER 


Features: 
* Full User Guide and 
Reference Manual 

provided on master 


cartridge The Editor can operate on RAM or disk files. Assembly 
%* Menu or keyboard < programs can be edited, assembled, executed and 
el Sraeniuamenargerinenteceeh debugged in memory with no microdrive access. The 
EZ AoTtrenaicut Editor is also suitable for programs in other languages 
* Compressed storage of designs (e.g. SUPERBASIC) 
* Complete library of drawing tools — lines, circles, The Assembler can operate in a conventional two-pass 
boxes, ellipses, polygons, curves mode or as a one-line assembler. 


* Two screen modes : Gree 
* Relocatable code (compatible with disc & extra RAM) The Monitor offers a useful dual screen to assist in 
x Up to 75 cells can be created debugging graphics programs. 
* Cells can be edited, mirrored, rotated, scaled, ; , 
’ positioned accurately in other cells. “Talent is on to yet another winner..... re 
* Grid and grid snap Popular Computing Weekly 
* Up to 8 layers per design 
* Text can be included 
# FAST multi-width printer output £24.95 (+ 50p postage and packing) 


Suitable for: Flow charts, electrical designs, mechanical 
drawings, letterheads/logos, architectural drawings. 
g 9 9 COMPARISON WITH OTHER PRODUCTS 


£ 9 9 o ‘ DIGITAL PRECISION 
4 s 5 (+ 50p postage and packing) Assombler Mentor | Assamblr | MoniaDrassontier 
Monitor 
Disassembler 
Text Editor 
Memory Editor 
On-line heip 
oN RM ARAGH 


Don’t forget Talent’s 
by Stefan Kuhne CARTRIDGE DOCTOR! 


An exciting, fast, addictive game for all ages. Find the fabulous Can YOU afford to be without it? 
treasure of the Lost Pharaoh — and live to tell the tale. £14.95 (+ 50p postage and packing) 


Deep beneath the desert sands, a vast labyrinth of underground » 
passages leads to the sealed burial chamber of the Pharaoh. N eo] 
Many foolhardy robbers and archaelogists have tried to reach it — Fr . wy v, | Gard 

but all have perished miserably. form to Talent | 


Can you succeed where they have failed? Armed only with your = fa N43 - Computer Systems, 


trusty blunderbuss, you must explore the ancient passageways FREEPOST, Glasgow | 


and find the hidden keys. But beware of monsters ...... ! COMPUTER SYSTEMS G4 OBR. 


Tel: 041-552 2128 | 


* Over 100 screens i Please send me TECHNIQL, [|] ASSEMBLER WORKBENCH, L] 

* Joystick or keyboard | THE LOST PHARAOH, [] CARTRIDGE DOCTOR. LJ A 

controlled l enclose a cheque for ..................-. Please debit my Access/Visa account 
* No intelligence required i { elsl | | | | | Expiry Date i 
I \ Name X 
£1 4.95 Address | 

(+ 50p postage and P. Code === Signature ee Fe 
packing) Gen ee ese eee eee ie es 


Return completed 


Rainbow 
announces 


keyboard 


Yorkshire repair specialist Rainbow 
Digital Repairs has revealed that it is 
working on a new keyboard for the 
QL. Bernard Joyce of Rainbow tells 
Sinclair QL World: 

“lam in the design process at the 
moment. | have a prototype which is 
almost working; all it needs is a few 
alterations to the matrix.” 

The new keyboard will, like the CST 
Thor upgrade, be an IBM clone with 
proper full-travel keys and a 2ft. 
wander lead. it would make the QL 
housing redundant other than as a 
processor and Microdrive box. Joyce 
envisages providing some kind of 
cover to protect the redundant plastic 
surface. 

The keyboard will be manufactured 
by Cherry, .a West German company 
which specialises in the production of 
IBM-style keyboards. Rainbow hopes 
to have it available this side of 
Christmas. The cost will be in the 


NEI 


Sinclair agrees to Sale of Microdrives 


Sinclair Research has finally reached 
agreement with Microdrive 
manufacturer Ablex which should free 
the future supply of blank cartridges. 

In the Amstrad deal, Sinclair 
retained ownership of Microdrive 
rights but has been reluctant to 
license their production. Ablex is 
under licence to produce Microdrives 
containing only pre-recorded 
software. 

The deal is being described by 
Sinclair as an interim agreement. It 
covers only present stocks of 
cartridges held by Ablex which, with 
demand running at more than 50,000 
a month, it is estimated will last for 


Microdrives, the inside story. 
some three months. 

Bill Nichols, of NMA 
Communications, the Sinclair public 
relations agent, says the purpose of 
the deal is “to end any confusion over 
the security and distribution of future 


supplies.” 

Negotiations between the two 
companies are continuing with the 
aim of reaching an agreement on 
continued manufacture and 
distribution of Microdrive cartridges. 


Fast utility 
from Qflash 


West German software house 
Qflash has released version 3 of its 
RAM disc and toolkit software. Qflash 
claims its RAM disc is 10 times faster 
in operation than competitive 
offerings. 

In addition to the version 2 features 
— fully-dynamic memory 
management, full software 
compatibility including the Psion 
packages — version 3 provides a 
toolkit of SuperBasic extensions and 
utility programs on a separate 
cartridge. The most notable is 
MDVLOAD, which copies a full 
Microdrive to RAM disc in 7-14 
seconds. 

The software is available direct 
from Qflash and from TK 
Computerware and Eidersoft in the 
U.K., costing £18.95, At the time of 
writing Eidersoft was selling version 
2 without the toolkit for £9.95 as the 
company was still in the process of 
Beta-testing version 3. 

Qflash 

Uwe Fischer, Postbox 102121 
D-200 Hamburg 1 

West Germany 

Tel: 010 040 7650461 


T. K. Computerware 
Tel: 0303 64039 


Eidersoft 
Tel: 0708 852647 


New printers from Citizen 


Printer Manufacturer Citizen is adding 
two new models to its range of dot 
matrix printers. The MSP 15E is a 


_136-column, wide-carriage printer, 


similar in specification to the Brother 
M1509 and Epson FX-105. 

Costing £449 the MSP 15E is 
almost identical to Citizen top-of-the- 
range MSP 25 printer but with slightly 
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slower print speeds. In draft mode the 
15E clocks a respectable 160cps, 
falling to 40cps in ‘correspondence’ 
mode. 

The specification includes Epson 
compatibility, full bit image graphics 
capability, optional RS232 interface 
and an 8K buffer. 

At £1,349 the MSP-10E is an 80- 


The new Citizen MSP-15E, 0 to 136 in less than a second. 


retion of £60. 


column printer with, in every other 
respect, identical specification. All 
Citizen printers are covered by a two- 
year guarantee. 


Further information from: 
Citizen Europe Ltd 

Wellington House 

4/10 Cowley Road 

Uxbridge, Middlesex UB8 2XW 
Tel: 0895 72621 


QL is trade-mark of Sinclair research LTD. IBM-AT is trade-mark of IBM INC. 


TODAY 


(we mean now) 


SANDY can supply you Q-XT 640 a complete, ready to go system 
with the following features: 


® Original QL main 
board 128K 
® Sandy Super Q Board with: 


— 512K RAM 

— Centronics printer port 
— Super toolkit Il 

— Floppy disk controller 


@®1 or 2. 3.5" drives (1MB) 


® Full travel keyboard 
IBM-XT style 
@® New internal 60 W 
switching power supply 
® 3 Expansion slots 


£.654(1 drive system) 
£. 699 (2 drive system) 


The above can also be supplied in kit form, to upgrade your existing QL as follows: 
Box, keyboard and power supply (suitable for any disk controller, memory expansion card and 3.5” floppy disk 
drive), no soldering required, fitted in seconds. 


£. 259 


The usual range of SANDY quality products is also available. 


SUPERQBOARD 
CONTENTS 


FLOPPY DISK DRIVER 

RAM DISK DRIVER (UP TO 512 K) 
PARALLEL PRINTER PORT 
SUPERBASIC EXTENSIONS 


SOFTWARE DESIGNED BY TONY TEBBY 

(THE AUTHOR OF Q-DOS) CONTAINS 

THE FOLLOWING ADDITIONAL COMMANDS 
SPL SPL_USE - File spooler 

JOBS AJOBS SPJOB RJOB - Job Control 

GET BGETPUT BPUT FPOS - Direct Access Files 
FLEN FTYP FDAT - File Enquiry Functions 

FOPEN FOP_IN FOP NEW FOP_OVER FOP_DIR 
VIEW - Examining a file 

WDIR.WSTAT WDEL WDEL_F - Wild Card Commands 
STAT - Drive Statistics 

WCOPY - Wild Card Copy 

RENAME TRUNCATE 

DATA_USE - Default Directory 

CLOCK - Resident Clock 

EXTRAS - Listing Extensions 

FLP_SEC-security level 

FLP_START-start-up time 

FLP_TRACK-nr of tracks 


= Oa 


FLP_USE-microdrive emulation 
RAM_USE mdv - microdrive emulation 
PAR_USE ser - serial emulation and many others... 


512K £.249 
256K £.214 
WITHOUT RAM £.135 
UPGRADE O TO 256K £. 84 
UPGRADE O TO 512K £.119 
UPGRADE 256 TO 512K £, 45 


THRU-CON RAM CARDS 


THE ONLY RAM CARD WITH THRU CONNECTOR 
OF SUCH COMPACT DIMENSIONS: 72 x 100 mm. 
FITS COMPLETELY INSIDE QL 
TWO VERSIONS - 256 K AND 512 K (YOUR QL MEMORY 
GROWS TO 384 K AND 640 K RESPECTIVELY). 
256 K VERSION EASILY UPGRADEABLE TO 512 K 
IN SECONDS ! 
D-RAM CHIPS FOR FAST ACCESS TIME (150 nS) 
NO WAIT STATE OPERATION - UP TO 30% FASTER THAN 
OTHER MEMORY EXAPANSIONS 
COMPATIBLE WITH ALMOST ALL MAKES OF FLOPPY DISK 
INTERFACE (PLS. INQUIRE) 
FLOPPY DISK INTERFACE COVER (FREE) 
120 


512K : re 
256K £. 80 
UPGRADE 256 TO 512K £. 40 


TO ORDER PLEASE PHONE (0234) 219814 OR COMPLETE AND POST THIS COUPON 


| ENCLOSE CHEQUE/POSTAL ORDER FOR £ 


Access 
| MADE PAYABLE TO SANDY (UK) P.C.P. LTD. aa. | 
| POST TO: SANDY (UK) P.C.P. LTD, 93 CHILTERN AVE, BEDFORD MK41 9EH PHONE (0234) 219814 | 


NAME 


FLOPPY DISK DRIVE 
TECHNICAL CHARACTERISTICS 


FLOPPY DISK: 3.5" HIGH QUALITY SLIM LINE TYPE 
MEMORY CAPACITY UNFORMATTED: 1000 KBytes 
MEMORY CAPACITY FORMATTED: 720 KBytes 
NUMBER OF TRACKS: 160 (2 x 80) 

AVERAGE ACCESS TIME: 86 ms inc. SETTLING TIME 
AVERAGE LATENCY TIME: 100 mS 

SETTLING TIME: 15 mS MAXIMUM 

TRACK TO TRACK: 3 mS MAXIMUM 

MOTOR STARTING TIME: 250 mS MAXIMUM 
ROTATION SPEED: 300 RPM 

TRACK DENSITY: 135 TPI 

RECORDING DENSITY: 8718 BITS per inch. 


INTERNAL POWER SUPPLY. 

Single £.125 

Double £. 200 
SPECIAL OFFERS 


Super Q board 512K with double 3.5" drive 1 MB... £.449 
Ram disk software ........+0+.0+05 
Datalife 3.5” disk DS DD 10 for 


ADDRESS 


PRICES INCLUDE VAT, POST AND PACKING DESPATCH WITHIN 14 DAYS OR MONEY BACK 


QL is trade-mark of Sinclair research LTD. IBM-AT is trade-mark of IBM INC. 


TOMORROW 


(is nearer than you think) 


SANDY technology offers you this... 


HARDWARE 


MC68000 8 MHz MPU 

128 kbytes exchangeable system ROM 
512 kbytes to 8 Mbytes RAM 
two external ROMPer connectors 

two internal ROMPer connectors 
(ROMPer / RAM bus) 

complete bus connector 

QL compatible display controller 

two full duplex, independent baud 
rate serial ports 

MIDI output port 

QL compatible network throught port 
parallel port 

mouse port 

sound generator 


, up to three 3%" floppy disk drives or 


one 32" hard disk drive and up to 
two floppy disk drives 

battery backed real time clock 
internal PSU 


KEYBOARD 


89 key IBM AT style keyboard 
CAPSLOCK LED 
joystick port 


SOFTWARE 


QDOS compatible operating system 

extended window handling 

pull down and static menu handling 

integrated pointer environment 
aes, improved error reporting 

SuperBASIC compatible programming 

oO language faster.execution 

all Supertoolkit facilities 

Hot key / mouse driven interface 

file manager 

spooler 

job manager 


TONY TEBBY DESIGN 


Send a suggested name for this new machine and we will award a free computer 
to the FIRST best suggestion we receive. Don’t forget your name and address. 


Would you like to be the FIRST proud owner of thisnew amazing machine? 
Contact SANDY (UK) for more details. 


SANDY (UK) P.C.P. LTD, 93 CHILTERN AVE, BEDFORD MK41 9EH PHONE (0234) 219814 


QL SURGERY 


The Sinclair QL World guide to curing a sick micro. 


large parcel 
arrived in the 
QL World offices 
along with the 
rest of the morn- 
ing post. As usual, we were 
eager to unwrap it and dis- 
cover what exciting new 
piece of hardware had been 
sent for review. 

It transpired that the par- 
cel contained a QL—anda 
damaged one at that. There 
was an anonymous letter 
enclosed which described 
the fault briefly -— the 
machine would crash after 
about five minutes’ use. The 
most astonishing thing was 
that the owner had not sent 
the machine in the vain hope 
that we might be able to 
repair it but was making us 
a gift. 

While things are not so 
bad that the only thing to be 
done with a dead QL is to 


give it away, it must be said’ 


that the process of putting a 
sick machine back on its feet 
is less than straightforward. 

Those with the least prob- 
lems are obviously QL own- 
ers whose machines are still 
covered by the 12-month 
warranty. Despite the fact 
that the Sinclair micro- 
computer business was sold 
to Amstrad in April, the war- 
ranty is still valid, even if you 
bought your machine before 
the takeover. Amstrad is 
obliged, in law, to honour the 
guarantee. 


The question is what do 
you do to ensure the 
speediest, cheapest and 
most reliable repair? For 
Owners of guaranteed 
machines there is only one 
option, unless you want to 
pay for the repair and that is 
to return it to the dealer from 
which it was bought. If you 
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have not had the machine 
for more than a few weeks, 
most dealers will replace it 
with a new model 
immediately. If the machine 
was faulty at the time you 
bought it the dealer must 
refund your money, though 
most people would be satis- 
fied with a working replace- 
ment. 

If you have had the machine 
for some time, though, it 
would be unreasonable to 
expect a new replacement. 
Under the Amstrad warranty 
scheme, the dealer sends 
your QL to a repair contrac- 
tor — probably Computafix. 
It repairs the machine and 
returns it to the dealer, from 
whom you can collect it free. 


e 
- 


. : 
Where owners of guaran- 
teed machines suffer is with 
the time it takes top effect 
repairs. Most of the repair 
companies included in our 
survey quoted turnround 
times of between 24 hours 
and three days, whereas for 
guaranteed machines it is 
more like four or five weeks. 

Boots told us that there 
was a six to seven weeks 
wait and if you bought your 
QL from Dixons you could 
be without it for as long as 
eight weeks if a fault de- 
velops. If you cannot afford 
to be without your machine 
for so long it might be worth 
considering paying for a 
more speedy repair. 

There are laws which gov- 
erm such things and if you 
QL breaks down there is 
every chance that the war- 
ranty period will have 
expired. In some ways, de- 
spite having to pay for the 
repair, you re in a better 
position than you might 
think. You can at least seek 
the quickest, cheapest and 
most reliable repair and 


many dealers offer extra ser- 
vices you would not get with 
a guarantee repair. 

The quick reference guide 
shows at a glance which 
companies perform QL 
repairs, how much _ they 
charge, how long it takes 
and gives a few other perti- 
nent details. 

Wherever you send the 
machine there are a few 
points 
First, if you can find a local 


GUIDE TO 


worth observing. ° 


repair centre and take your 
machine personally you will 
obviously get it back much 
more quickly than if you trust 
it to the post; some places 
even offer a while-you-wait 
service for certain 
straightforward repairs. 

If you must send you QL 
by post, there is no point in 
sending it by Recorded 


Delivery as there is no real 
advantage to be gained. For 
ordinary parcel post, provid- 


In bygone days, when 
computers were made of 
wired keyboards and any 
number of discrete boards, 
fault-finding was a little 
easier for the layman. If a 
faulty board could be found 
it could be removed and 
replaced, a relatively 
inexpensive job. 

The QL has a membrane 
keyboard, internally, and 
only one board. The 
memory chips are soldred- 
in, usually, and the 
Microdrive mechanism is 
part of the moulded case. 
The Microdrive recording 
heads are not adjustable. 


Those are, of course, 
some of the features which 
permit such a powerful 
machine to be sold at such 
low cost, so we can hardly 
complain. 


That implies that fault- 
finding and repair work by 
the knowledgable owner is 
a little more difficult. One 
big handicap is that no 
circuit diagram is supplied 
as standard, I would suggest 
that unless you have a good 
deal of experience of repair 
work, a QL service manual 
and a very friendly custom 
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ing you have obtained a free 
Certificate of Posting, the 
Post Office will pay compen- 
sation for loss or damage of 
up to £18. 

The best choice is to send 
the QL as a Compensation 
Fee parcel. That will cost an 
extra 70 pence but your 
goods are covered to the 
value of £350. Registered 
Mail provides similar cover. 

There are a number of 
things you can do to ensure 
that your QL is returned to 

“you in working order as 
quickly as possible. Some of 
the companies listed will give 
an estimate by telephone if 
you can provide them with 
a good idea of what has 
gone wrong. 

The  fault-finding guide 
should provide you with a 
reasonable idea of exactly 
where the problem lies. If 
you telephone the repair 


TR 


chip supplier, you would do 
well not to attempt to repair 
the QL. 
You may feel more 
confident about a 
commercial repair and be 
able to obtain a quotation on 
the cost of repair, if you 
could be specific about the 
fault. If a Microdrive is not 
working properly, in what 
way(s) is it not working? If 
the QL keeps locking-up, is 
there a good reason? By 


Fault 

Green/white screen on power-up 
or re-set 

Large blocks/stripes of colour 
and possible speaker noise. 

No re-set or spurious re-sets 
occurring. 

QL locks-up after specified 

time. 


QL locks-up at random. 


Microdrives fail to read/write 
properly ona cartridge in use 
in one drive only. 

Microdrive fails to read 
cartridges recorded on by 
other drive. 

Microdrive fails to read/write 
any cartridge. 


Certain keys—not usually the 
complete set - fail to operate. 


centre and. provide that 
information most of them will 
be ready to provide you with 
an on-th-spot estimate. You 
can then send your QL, 
together with a cheque, and 
the repaired machine will be 
despatched as soon as it is 
ready. 


It is worth noting the 


method by which repair 
companies return machines. 
Nearly all will send them by 
first class insured post but 
some offer the option of col- 
lection and return by courier. 
That will obviously have to 
be paid for but the saving in 
time may be worth it. 

If you cannot afford to be 
without your QL for so much 
as a minute it may be worth 
considering taking advan- 
tage of one of the schemes 
which offer a replacement 


looking carefully at the 
options you may save 
yourself a repair bill. Let us 
consider a number of 
common areas of fault in the 
QL. The table lists faults 
against possible causes. The 
list of numbers relates to the 
action(s) you can take either 
to cure the fault or check 
where it lies. The related 
actions are listed after the 
table. 


Cause Check 
Faulty expansion 1,2 
port or RAM. 

Chip or bad chip 5 
pin contact. 

Faulty re-set 4,5 
switch. 

Overheating/ 3,6,7,8 
bad contacts/ 

noisy mains or 

marginal RAM 

Noisy mians/ 3.7.8 
bad contacts or 

marginal RAM. 

Noisy mains or 6,7 
over-heating 

Bad alignment 9 
Over-heating/ 3,6,9 
bad pin contacts 

or faulty drive. 

Faulty keyboard 10 


membrane. 
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UBLE 


machine while yours is being 
repaired. Alternatively, it may 
even be worth keeping a 
spare machine for such 
eventualities. 

We list all the companies 
we contacted which carry- 
out QL repairs. The inform- 
ation provided should give a 
good idea of which best 
suits your needs. Bear in 
mind when choosing a re- 
pairer that cost is not every- 
thing. Also those who quote 
a 24-hour turnround may 
not be able to honour it if 
certain parts are unavailable. 
Itis always best to telephone 
beforehand and check. 

Eidersoft charges ac- 
cording to the complexity of 
the repair. Prices range from 
£17 for a simple fault to 
slightly less than £40 for a 
really complicated mess. If 
the damage is more exten- 
sive than that — for example 


devices. 


4. Re-set switch has been damaged by upward pressure 
while using it. Check state of switch by removing QL lid. 

5. Power plug connections are weak through too much use. 
Replace or hard-wire power lead. 

6. Over-heating. keep away from direct sunlight and other 
heat sources. Do not cover vent holes. Remove expansion 
boards to see if they are drawing too much power from 
the QL. Place small silent fan behind r.h.s, of machine or, 
if confident — and as last resort — remove regulator and 


heatsink to outside of case. 


7. Noisy mains supply. Rectified easily by using proprietory 
suppressor plug or module — see advertisements in this 


issue. 


8. If QL contains marginal or ‘lossy’ RAM, a full RAM test 
will be needed to check operation of RAM. See next 
month’s technical help column for appropriate program. 

9. If Microdrive heads are mis-aligned there is little hope 
of cure except by a complete replacement by a repair 
centre. Check first that your TV/monitor is not near the 
Microdrives as that could have the same effect. 

10. Faulty keyboards are best left to repair centres. 


Note: If you feel that an éxpansion module is drawing too 
much power form the QL, your only hope of cure is to buy 
an expansion box, usually 2-way, which has its own power 
supply. It plugs into the expansion port and expansion 
modules are then plugged into the box. 


SHOOTING 


. Remove any expansion module and check operation. If 
fault is cured the expansion module is faulty or requires 
too much power from the QL. 

2. External RAM is faulty. Treat as for 1. 

3. Bad chip in contacts can be checked and cleaned only 
by removing all posible chips — not ones soldered in — 
from main board. Do not perform this unless confident 
and obey all normal rules regarding static-sensitive 


if you have attempted a RAM 
upgrade and failed — Eider- 
soft would probably not be 
interested. 

As with most of the other 
companies, the usual repair 
undertaken is to the Micro- 
drive or video ULA, or the 
keyboard, and the price for 
that would be around £30. 
For £39.95 you can take ad- 
vantage of the Eidersoft 
Business Support Service. 
That gives you access to the 
telephone hotline — instant 
help with problems. The 
company will also provide 
subscribers with a replace- 
ment QL while theirs is being 
repaiored. You will, how- 
ever, have to pay for its 
despatch — £10 by post, £18 
by. courier. 

Eidersoft will provide 
breakdown insurance if you 
require it at a cost of £49.95. 
Peripheral repairs are also 


undertaken as well as JS 
ROM upgrades. Telephone 
for further details. 


Capital Computers: A\- | 


though Capital Computers 


operates a standard-charge ° 


system for other machines, 
it does not do so for the QL. 
The reason given was that 
the QL uses ‘more obscure’ 
parts. Capital, therefore, 


take QLs on estimate basis. . 


you telephone when the 
company has looked at the 
QL and you are told how 
much it will cost. That could 
be anywhere between £5 
and £28. 

Capital reckons to have 
your QL back in the post 
within 72 hours of receiving 
it and claims a 24-hour turn- 
round on some jobs. A 
three-month guarantee is 
provided and should you 
need to take advantage of 
it, Capital will refund the 
postage. The Capital 
guarantee is more com- 


prehensive than most in that : 


it covers the complete 


machine, not just replaced 


parts and labour. 
Computafix was the 
warranty repair agent for 
Sinclair and claims to be the 
biggest home computer 
repair centre in Europe, re- 
pairing some 8,000 
machines a day. It will repair 
your QL in 48 hours and re- 
turn it by insured post. There 
is a standard charge of £ 
no matter what the problem 


and that includes a standard. 


three-month guarantee on 
parts and labour. 


The Computer Repair 
Centre: If you take yuour QL 
to the Centre it will give you 
an on-the-spot 
which will usually be 
between £25 and £29. 
Otherwise you could post it 
and pay the standard repair 
charge of £29.95. Machines 
are returned in two to three 
days and the workis guaran- 
teed for three months. 

Chromasonic 
Computer Centre: 
Chromasonic says it can re- 
pair about 70 percent of the 
QLs it receives; the other 30 
percent go to a sub-con- 
tractor. The reason is that 
certain parts are difficult to 
obtain — a not uncommon 
complaint. Major compo- 
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estimate . 


nent supplier CPC, however, 
said that parts present no 
difficulty. 

It seems more likely the 
problem is one of the delay 
arising from reluctance of 
dealers to stock numbers of 
the more expensive QL 
components and then run- 
ning out. Anyway, if it can, 
Chromasonic will repair your 
QL for £29.00, including a 
three-month guarantee on 
parts and labour. 

Mancomp: The price for 
repairs in Manchester is £20 
to £40. If you walk through 
the door with a sick QL 


think has gone wrong. You 
will then receive an estimate 
by telephone and you can 
enclose a cheque with the 
machine. That way your 
computer will be 
despatched by insured post 
within 24 hours of receipt. 
Mancomp guarantees _ all 
work for three months. 
Rainbow Digital 

Repairs: The minimum re- 
pair charge is £17 for a 
keyboard fault. it rises to £30 
for any other electronic 
problem to a maximum of 
£37.50 for Microdrive re- 
placement. All prices include 


QL REPAIR 
CENTRES 


Eidersoft, 

The Office, Hall Farm 

North Ockenden 
Upminster, Essex 
RM143QH Tel: 0708 852647 


Capital Computers 

Unit K2, Cardiff Workshops 
Lewis Road, East Moors 
Cardiff CF1 5EG 

Tel: 0222 614401 


Computafix 

Orbany Park, Primley Road 
Camberley, Surrey 

Tel: 0276 66266 


Computer Repair Centre 
28 College Street 
Worcs. WR1 2LS 

Tel: 0905 41072 


Chromasonic 

48 Junction Road, Archway 
London N19 5RD 

Tel: 01 263 9493/5 


under your arm, and if Man- 
comp has the parts, it re- 
ckons to have you walking 
inthe opposite direction with 
a cured machine inside an 
hour. That must be some- 
thing of a record. 

Send it by post and you 
will receive a_ telephoned 
estimate before the com- 
pany carries out the repair. 
If you are in a hurry, refer to 
the trouble-shooting chart 
and tell Mancomp what you 


Mancomp 

Printworks Lane 
Levershulme 
Manchester M19 3JP 
Tel: 061 224 1888 


Rainbow Digital Repairs 
Clark House, Haxby 
Yorks. YO3 8HU 

Tel: 0904 768853 


Suredata 

Canons Park, Edgeware 
Middx. HA8 6TQ 

Tel: 01 951 0124 


Videovault 
140 High Street, Glossop 
Tel: 04574 66555 


Quantum 
33 City Arcade 
Coventry, Tel: 0203 24632 


Zedem Computers 
2 Kimbolton Road, Bedford 
MD40 2NR Tel: 0234 213645 


VAT and return insurance 
and postage. Those who 
cannot wait may consider 
paying the extra £15 to have 
the machine collected and 
returned by courier. 

Rainbow also provides JS 
ROM upgrades. It charges 
for DIY kit and £30 for the 
replacement. 

Suredata has no 
standard charge but, on av- 
erage, repairs cost between 
£25 to £30 including post- 


age, packing and insurance. 
If you telephone and de- 
scribe the fault you will re- 
ceive an estimate. All work 


is guaranteed for three 
months. 

Videovault is another 
Manchester company. 


While it admits to carrying- 
out QL repairs it must be 
said that it seemed less than 
enthusiastic. It said its ability 
to repair a QL depends 
largely on whether it has the 
parts and can trace the fault. 
If that does not deter you the 
£50 standard charge prob- 
ably will. if Videovault can re- 
pair your machine, it will do 
so the same day and return 
it by insured parcel post. 
Quantum has been in the 
business of repairing Sinclair 
machines for about three 
years. It has a fixed labour 
charge of £12 and parts are 
extra. An everday fault would 
probably cost £20 to £25. 
Quantum can do over-the- 
counter repairs, or the usual 
postal deal in three days. 


Zedem: This Bedford- 
based company has a 
slightly different approach to 
charges. it quotes a 
standard charge of £24.95 
including postage. Often the 
cost will be less but if it is 
more you will be told before 
continuing. The usual turn- 
round time is two to three 
days but, once again, if parts 
are in short supply it could 
take as many weeks. One 
thing which sets Zedem 
apart from the other repair 
centres is that it offers a six- 
month guarantee on all 
replaced parts. 

The important thing to 
remember is that getting 
a good deal on repairs is 
like buying anything else 
- it is worth shopping 
around. Telephone com- 
panies before parting 
with your QL, if only to 
check on availability of 
parts. By referring to the 
troubleshooting guide 
and describing the fault, 
you can get a good idea 
‘of cost as well, as ex- 
pediting repair. It is point- 
less being without your 
QL for longer than is 
necessary and the more 
you can reduce waiting 
time the better. 
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DS Enterprises 
(01) 671 0209 


Disks 
5.25" DS DD 
Mimic (Recommended) 


3.5” DS DD Disks at only ***** £28. 50 ***** Per Box 


All disks are guaranteed and come packed in plastic flip & file type boxes. 


Single ae Track 


Dual 80 Track 


Latti 

Pascal ui ISO) 
Cash Trader 
Lisp 

Sine ig (Basic Compiler) 
Ram Disc (Ram Disk & Utilities) 
QL User Recommended 
Toolkit Il (Eprom version) 

Ice & Choice 
Sign Designer (Designs Screens & Signs) 
QL User Recommended 

Touch Typist 


Add On’s 


512k Expanderam (Miracle Systems) 
Including Ram Di 
Dual 3.5” Drive & Interface (Silicon Express) .. 
C.S.T. Interface 

C.S.T. Plus Expanderam ... 
As above Plus! Dual 3.5” Drives 

Citizen 120D Printer (Including Leads & Quill Install) 
Astrocom Modem (Ex Brightstar) 

Sandy 512k Super QBoard 


All Prices include Vat and Post & Packing (in UK). Phone for full price list 
or quote on other items, or details of discounts on large orders. 
DS Enterprises 
25 Trinity Rise, London SW2 2QP 
Tel: (01) 671 0209 


£119.95 
-- £127.50 
-- £269.95 
£82.95 
..- £200.00 
-. £399.00 
s- £199.95 
- £194.95 


APPROVED ‘qu 
for use with 
telecommunication systems 
run by British 
Telecommunications 
in accordance with the 
conditions in the 
instructions for use 


features. 


Q-CONNECT 


Tandata?” 


Tandata Marketing Limited 


Albert Road North, Malvern, Worcs. WR14 2LT. 
Telephone: 06845 68421. Telex: 337617 Tandat G. 


Prestel *799# Telecom Gold 81: TANOO1 
A subsidiary of Tandata Holdings plc 
Prestel is a registered trade mark of British Telecommunications plc 


Q-CALL 
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The only communications package for the QL. 

The modules are available separately but, by 
using all three as a complete matched system, 
full advantage can be taken of the integrated 


Complete RS 232 output for general 
communications from 75-9600 baud with full 
two way buffering and flow control. Software 
on a micro drive to support all 3 modules 
includes Prestel Viewdata/Videotex and 
VT100 emulation, and many other features. 


bps and 1200/1200 half duplex. 


Provides traditional pulse/loop disconnect 


| 
| 
| 
| 
| 
Manual dial V23 modem operating at 1200/75 | 
I 
| 
I 
auto-dial and auto answer. | 


QL COMMUNICATIONS 


QCODE TERMINAL software ...........0+0 eveuavevascessaeaser ean £19.95 
Features: 
VIEWDATA TERMINAL — for PRESTEL and MICRONET 
Split baud rate operation (75tx/1200rx) in conjunction with MODAPTOR (see below) 
— necessary for calling PRESTEL. 
Can handle dynamic frames. 
Full emulation of colours, mosaics, separated mosaics, etc. 
Save displayed page to file on microdrive or disk. 
Save entire session to file on microdrive or disk. 
Replay, create or edit saved pages whilst off-line. 
* Transmit a saved file. 
PLUS 
VTS52 (Scrolling terminal) — for use with Bulletin boards, electronic mail services, mainframe 
computers, etc. 
* 80 column (4 colour), or 40 column (8 colour) modes. 
x VT52 control codes, for fancy editors, etc. 
x Additional control codes to set display colours. 
x Alternate keypad emulation. 
* Upload or download text files using standard utilities on host. 
x XON-XOFF protocol. 
PLUS 
* QLto QL file transfer. Any file transferred from disk or microdrive, including executable 
files, Quill documents, etc. 
* Error detecting and correcting protocol. 


QL MODAPTOR .......s220020008 proccevusnastcectherastectesrsacersrteneaentecries £39.00 
* Links QL to 300/300, 1200/75, 1200/1200 modem. “eg WS2000, PRISM ‘{o00 &2000, 
NIGHTINGALE, DATACHAT, VOYAGER 11. 
* Includes QCODE TERMINAL software. 
* State modem type when ordering if not 25 way connector. 


MODEN 1000 with Modaptor & Software .....sssssssseseee £59.00 
* The Prism Modem 1000 is aB.T. approved, manual dial modem that operates at 1200/ 
75 full duplex or 1200 baud transmit only. 
* This package provides all the hardware and software you need to connect your QL 
to Micronet, Prestel, BT Gold or any other 1200/75 baud service. it also allows QL 
to QL file transfer at 1200 baud. 


VOYAGER 7 MODEM with Modaptor & Software .........- i 
* This package enables you to use 300 baud full duplex as well as 1200/75 and 1200 
transmit. Manual dial, BT approved. 


* 


+ + + OF 


QfLash RAM DISK (while stocks last) 


QCODE 
42 Swinburne Road Abingdon OXON OX14 2HD 
Telephone: 0235 28359 (9.00 am — 8.30 pm) 


G CONNECT O- 0D 


‘19:99 


0- CONNECT AnD 
Pp dascad 


“99-99 


PRICES INCLUDE VATS Pp 


I'd like to know more about Tandata 
communications for the QL. 


Name 


Address 


Tandata Marketing Ltd., 
Albert Road North, Malvern, 
Worcs. WR14 2TL. 


oe ES Se ee 
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Open Channel 
provides you with 
the opportunity to 
voice your 
Opinions in 
Sinclair QL World. 


Printing Quill 


I am prompted by letters 
from Messrs Yamaguchi, 
Knife and Singer in your July 
issue to write regarding the 
means of controlling printer 
Output from Quill, Abacus 
and Archive by use of 
embedded codes. They are 
codes which will appear on 
the screen but before being 
passed to the printer from 
the QL will be translated into 
control codes similar to 
those for bold, underline 
and the like which are 
already part of the programs. 
The codes are created by 
use of the abundant 
translates within the 
install_bas program in 
versions 2 and 3 of the 
software. First select a 
character which you are sure 
you will never want to 
appear on paper. All the 
characters with ASCII codes 
greater than 127 and less 
than 182 are good bets in 
this regard. 
Enter this character into 
the translate followed by the 
control code which you wish 
it to imitate, which you will 
find in your printer 
handbook. I have an Epson 
RX-80 F/T so if I enter the 
following into my printer_ 
dat; 
Translate 2: 165,27 
-it translates <CTRL SHIFT 
E> into <ESC>. In the 
Epson, I can therefore get 
enlarged text by typing 
<CTRL SHIFT E> followed 
by <W1>. Text will be 
enlarged until I enter 
<CTRL SHIFT><W0> or 
another suitable translate 
code. 
By the use of these codes 
I have been able to create 
enlarged or condensed, 
italics, elite or pica-sized, 
emphasised or double 
strike. I can also control line 
spacing locally to 1/8in., 
7/72in., n/72in., 1/6in. or 
n/216in. where n is the 
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Write to: 

Open Channel 
Sinclair QL World 
79/80 Petty France 
London 

SW1H 9ED 


number of the code of the 
character immediately 
following the embedded 
code. For instance, <CTRL 
SHIFT: E><3><L> gives 
1/2in. line spacing until 
<CTRLSHIFT E><2>re-sets 
to standard 1/6in: spacing. 

It is also possible to 
call-up the character 
generator which gives 
access to some potentially- 
useful symbols. One word of 
caution, however, is that the 
positioning of the codes on 
the screen can lead to 
disruption of the margins 
and justification of the 
printed text but a small 
amount of trial and error 
will soon correct that. 

Of course, you must 
remember that if you are 
using enlarged text the line 
on the screen may not fit on 
one line of the paper but I 
use enlarged mostly for 
headings which usually fit 
well. 

The use of Quill in my 
work has been greatly 
enhanced by using these 
codes, since I can now 
control line spacing so that 
pre-printed forms with 
awkward spacings can be 
filled in with all my answers 
in the proper place. I also 
find that printing 
spreadsheets from Abacus in 
condensed mode means that 
more of the sheet can be 
fitted:on to the page. 

John McKevitt, Newbury. 


Bug-hunting 


Having broken the rule of 
back-up which, of course, I 
never do, I started to load a 
Quill_doc containing some 
creative work. After a 
minute, up came File i/o 
incomplete which made me 
try to look up what it meant. 

I have yet to find that it 
means anything other than 
that the cartridge is willing 
to keep it listed but, neither 
by loading, merging nor 


copying will it ever let it out 
again. Nothing wrong with 
the tape. Three more bugs: 

One cartridge has a 
random ability to underline 
any entire Quill file. That I 
can side-step by re-loading. 
Sometimes the listing is 
underlined but not the 
mdv2_ heading. Ask for a 
re-listing and this time only 
mdv2_ is underlined. Each 
of those conditions shows 
me whether or nota loading 
will be underlined or not. 

Quill tells my Brother 
HR10 to head every sheet 
with an underlined @. All 
my reading for a remedy 
fails me. 

Recently I have added a 
through port MSL 512K 
Expanderam and wallow in 
piles of memory. This gem 
is adding UHF not screened 
out by any shielding, with 
the result that light snow 
pervades the VDU together 
with raster lines when 
winding some Microdrives. 

At that moment of truth 
when I re-set, the 
milliseconds of the 
remaining display are as 
clear as a new &5 note, 
suggesting that earth or 
grounding is notall it might 
be. I am not willing to 
suggest it is the MSL plug, as 
there always was a little 
snow. Because of 
practicalities in our 
household, we work on any 
one of three TV sets, not a 
monitor. 

Apart from all that, lama 
very happy QL person. Is 
there any hope with my bugs 
or must I just scratch? 

Roy Myers, 
Northampton. 


The file I/O incomplete error 
usually occurs when you try 
to save a document to a nearly 
full Microdrive. You should be 
able to recover at least part of 
the document by merging. It 
sounds as if you are using the 
wrong printer driver for the 
HARI10. 


Readers help 


In the June edition of OZ 
World you published my 
letter which requested some 
help in writing a program 
for our rent returns/petty 
cash transactions. I would 
like to thank you for 
publishing it and to say we 
had an overwhelming 
response from readers. 

It is very gratifying to 
know that there are so many 
who are willing to give their 
time and expertise to help 
those who are less fortunate 
than themselves, so perhaps 
you could publish this letter 
as I may have neglected to 
reply to them all. 

We would like to thank all 
those who wrote or 
telephoned with offers of 
help and to say that a 
program is now being 
written for us and should 
soon be in operation. 

The Parkview Society Ltd, 
Torquay. 


Mail order 


My firm has maintained a 
very strong position in the 
mail order market for almost 
four years, by taking great 
pains to give our customers 
cause to trust our service. 
For this reason, I hope that 
readers will feel able to 
accept two points of 
guidance from us. 


First, if you have cause to 
return goods for a refund, 
sending them by recorded 
delivery is a waste of money. 
The Post Office pays 
compensation of up to £18 
in respect of goods lost in 
the ordinary mail, whether 
the package was sent RD or 
not. 


The important point is to 
ask the Post Office for a 
certificate of posting, which 
is issued free. If the goods 
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are then lost, the certificate 
enables you to prove that 
you posted them and, in 
those circumstances, under 
the Mail Order Code of 
Practice of the Advertising 
Standards Authority, the firm 
to which you returned them 
must pay compensation and 
refund your postage costs, 
even though it has not 
received them. 


If it does not, you can 
complain, without charge, to 
the ASA, which can threaten 
to ban that firm’s advertising 
unless it pays. Of course, it 
would be reasonable to 
provide the firm with a 
photocopy of the Certificate 
of Posting, so that it, in turn, 
can chase the Post Office for 
its compensation. 


If the goods are worth 
more than £18, you have 
two choices. You can send 
them as a Compensation 
Free parcel, which is cheap, 
and takes only two working 
days, or as a Registered 
Letter, which is often 
quicker but more expensive. 


The important point is do 
not bother with recorded 
delivery, which gives you no 
additional benefits in these 
circumstances. 


Harry Whitehouse, - 


Newark. 


8056 printers 


I bought a QL from Dixons 
with a 8056 serial printer. As 
many of your readers will 
have this combination, I 
would like to offer some 
information and advice to 
users. Install as: 

PORT: ser1 

BAUD RATE: 1200 

PARITY: NONE 
LINES/PAGE: 66 
CHARACTERS/LINE: 80 
CONTINOUS FORMS: NO 
END OF LINE CODE: CR, LF 
PREAMBLE CODE: CAN 


Star letter 


I am a research student 
working in dynamical 
astronomy at Liverpool 
University and so I was 
particularly interested to 
read the final instalment of 
John Dice’s series on 
astrology on the QL. My first 
reaction was to dismiss the 
series as just more 
superstitious nonsense but, 
putting aside my 
astronomer’s prejudice, I 
have to say that this 
instalment was very 
informed and lucid. Iwould 
like to adda few remarks on 
my own. 

First, as Dice makes clear, 
the mathematics of planetary 
motion is very complex but 
numeric integration is not 
the simple alternative he 
suggests. The theory and 
practice of numeric 
integration has been the 
subject of many textbooks 
on astronomy and it should 
not be approached in the 
light spirit which 
characterises Dice’s account 
of it. To say that an 
integration covering one 
million years of outer planet 
positions will take a week on 
a QL begs the question of 
how to write such an 
efficient integration program 
in the first place. 


POSTAMBLE: NONE 
BOLD ON: 27,87,1 or 16,57,1 
or ESC,W,SOH 
BOLD OFF: 27,87,1 or 
16,57,0, or ESC, W,NUL 
UNDERLINE ON: 27,45,1 or 
16,2D,1 or ESC,_,SOH 
UNDERLINE OFF: 27,45,0 or 
16,2D,0 or ESC,_,NUL 
SUBSCRIPT ON: NONE 
SUBSCRIPT OFF: NONE | 
SUPERSCRIPT ON: SI 
SUPERSCRIPT OFF: DC2 
The preamble code is not 
needed but the one given 
clears the buffer and re-sets 
the printer. 
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That brings me to my 
second comment. Dice 
refers to Astronomical 
Papers for the American 
Ephemeris, volume 22 for 
information on numeric 
integration. Most readers 
will find it difficult, if not 
impossible, to obtain copies 
of APAE unless they have 
access to the libra.y of a 
university or of the Royal 
Astronomical Society. 


A better source of 
information on dynamical 
astronomy at all levels, 
especially with regard to the 
use of computers, is the 
two-volume Astrodynamics 
written by Samuel Herrick 
and published by Van 
Nostrand Reinhold. I would 
recommend the book to 
anybody who wants to know 
more about the mathematics 
of planetary motions. 

Another excellent 
reference is Explanatory 
Supplement to the 
Astronomical Ephemeris 
which is mentioned by Dice 
in his article. I recommend 
that, too, but Iam afraid that 
itis now out of print and so 
it is unobtainable from 
HMSO. Any good library, 
however, should be able to 
obtain a copy on request. 


If you want only the 
positions of the planets in an 


The 8056 is not capable of 
sub/superscript. This 
example uses Quill 
superscript setting to 
generate compressed (136 
char) text. On-screen this is 
smaller and so gives the 
impression of Quill having 
compressed text. It can be 
used for part of the whole of 
a letter and does not use any 
Quill characters. If you 
print all text regularly in 
compressed it may be better 
to use this method: 

TRANSLATE 1 

TRANSLATE 2 


#,SI 
*DC2 


easy-to-use form the best 
reference is the 
Connaissance des Temps 
which is published annually 
by the Bureau des 
Longitudes in Paris. It gives 
the co-ordinates in the form 
of Chebyshev series which 
are ideal for use with a 
computer. 

I look forward to seeing 
more articles like Dice’s 
but perhaps under the 
heading of Astronomy next 
time. 

David Harper, 

Dept. of Applied 
Mathematics and 
Theoretical Physics, 
Liverpool University. 


Progs paucity? 


Why are most of the 
programs featured recently 
in The Progs not being made 
available via Microdrive 
Exchiange? Are you planning 
to bring this service 
up-to-date? 

M.H. Hudson, Matlock. 


There is room only for a 
limited number of programs 
on Microdrive Exchange, so 
we try to include the best. 

Also, authors are given 
the option of inclusion in 
Microdrive Exchange in 
return for a reduced 


_ publication fee. 


To turn compressed text 
on type # {hash} and * 
{asterisk} to turn it off. That 
way the text will appear 
normally on screen. 

Although the 8056 can use 
either sheet or roll paper the 
continous form option is set 
to NO. When a page is 
printed it will wait before 
printing the next page. That 
means that the results can be 
checked before the machine 
prints over pages of the 
expensive thermal paper 
incorrectly. 

M Becket, Barnsley. 
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The QL has one of the most powerful Basic dialects available on any small computer, so it is only 


proper that Sinclair QL World should have a regular feature devoted to SuperBasic. Whereas The 


Progs will contain whole programs and thre will be other features involving SuperBasic programming, 


this section will concentrate on short, useful SuperBasic routines for incorporation in your programs 


and on good programming technique. 


To start the series, there is a simple but effective technique for writing programs without line numbers. 


and the computer attempts 
to load a program called 
BOOT on Drive 1. That is 
undoubtedly a useful feature 
but it is not so helpful as it 
might be. A Microdrive 
might contain more than 
one frequently-used 
program but they cannot all 
be called BOOT. 

The routine in listing 
one offers no fewer than six 
options on starting-up. It is 
not a program in the 
accepted sense and, once 
run, it ceases to exist. The 
advantage is that it is loaded 
very quickly and it uses no 
space in the Basic storage 
area of RAM. 
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The technique works 
because Qdos saves all files 
in ASCII format and because 
the QL does not care from 
where its instructions come. 
It is possible to save a series 
of commands, without line 
numbers, in a Microdrive 
file. When that file is loaded 
or merged, those commands 
are carried-out as soon as 
they are interpreted by 
SuperBasic and they are 
then lost, just as if the 
command had been entered 
on the keyboard. A file can 
contain a mixture of direct 
commands and proper 
numbered program lines 
and the computer will store 
the program lines correctly 
and carry-out the direct 
commands. 

Unlike most Basics, 
SuperBasic makes minimal 


reference to line numbers. 
They are essential only for 
RESTORE statements, to 
identify user-defined 
procedures internally and to 
differentiate direct 
commands from program 
lines. GOTO and GOSUB 
also need program line 
numbers but they are 
clumsy and superfluous 


108 DEFine PROCedure bootmaker 
11@ DELETE mdvi_boot 
1208 OPEN_NEW#3,mdvi_boot 
138 PRINT#3; 
148 PRINT#3; 
#2; DATES" 
15@ PRINT#S; 
160 PRINT#3; 
170 PRINT#3; 
188 PRINT#3; 
198 PRINT#3; 
208 PRINT#S3; 
218 PRINT#3; 
228 PRINT#3; 
key = 10: EXIT loop” 
230 PRINT#S; "IF key 
248 PRINT#3; "IF key 
250 PRINT#3; “IF key 
266 PRINT#3; "IF key 
278 PRINT#3; “IF key 
288 CLOSE#sS 
298 END DEFine bootmaker 


“PRINT#23 
“PRINT#23 ‘Fi LRUN 
"PRINT#23; ‘“F2 LRUN 
“PRINT#23; ‘FS LRUN 
“PRINT#23 ‘F4 List 
"PRINT#2; ‘FS List 
“PRINT#2; ‘ENTER = 


248: 
244: 
248: 


DIR 
DIR 


"REPeat loop: key = CODECINKEY$(-1)): 


commands which are best 
ignored. SuperBasic is only 
half a step away from doing 
without line numbers 
altogether and one wonders 
if they were retained only to 
make the listings look 
familiar to Basic 
programmers. 

It is not possible to create 
a file of direct commands 


Listing 1. 


"CLSW2: PRINT#2; “Hello...°" 
"IF DATE < Be8: PRINT#2; 


“Clock not set’: ELSE: PRINT 


“Select:-‘" 


mdvi_EDITOR‘” 

mdv2_BOOT"" 

mdvi_program’” 

mdvi directory’" 

mdv2 directory’" 

Fresh start’” 

IF key > 231 OR 


232: LRUN mdvi_editor" 
236: LRUN mdv2_boot” 


LRUN mdvi_program” 


mdvi_” 
mdv2_" 
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and expect it to run in all 
respects like a normal 
program. Each statement 
must be capable of being 
carried-out directly and 
therefore DATA and READ 
statements, user-defined 
procedures and multiple- 
line IF... THEN, REPeat and 
FOR... NEXT structures are 
not allowed. 

Listings one and two show 
how this unusual feature of 
the QL can be put to good 
use. The first is a routine to 
construct a BOOT program 
and the second is a user- 
defined replacement for the 
SuperBasic SAVE command. 

The BOOTMAKER 
procedure — listing one — 
begins by deleting the 
previous BOOT file and 
Opening a channel to a new 
BOOT file. The file is filled 
with a series of statements 
before being closed. When 
the completed BOOT 
program is run, the 
computer passes the time of 
day with the user, displays 
the time—or warns that the 
system clock is not set—and 
then offers a menu of 
options. The user can 
choose to load one of three 
programs — see directory 
listings for either Microdrive, 
or start programming witha 
“clean” computer. 

Of note are the IF... 
THEN and REPeat structures. 
Both are of the short, 


TO is a versatile and 
surprising little keyword 
with no fewer than seven 
uses. It is used most 
frequently to indicate a 
range of numbers, as in 
these examples: 
FOR X = 1 TO 50 
SELect ON X = 10 TO 22 
LIST 100 TO 199 

It is also found in PRINT 
statements to indent the 
printing of a string. This is 
mentioned briefly but 
incompletely in the User 
Guide. Here are the facts. 
The first two lines below are 
identical in effect, the third 
is rather different: 
PRINT TO 10; “HELLO” 
PRINT FILL$(” ",10); 
“HELLO” 
AT 2,10:PRINT “HELLO” 


KEYWORD 


single-line form and are thus 
acceptable to the interpreter. 
Line 140 tests the internal 
clock; if DATE returns a 
number higher than 8e8 
then the clock is assumed to 
be set correctly. DATE is a 
function which counts the 
number of seconds since 
midnight on January 1, 1961; 
800 million seconds equates 
to some time on the evening 
of May 9, 1986 and therefore 
represents a reasonable test 
of whether the clock is set 
correctly or not. 

Once the menu has been 
printed, the routine enters a 
REPeat loop to test the 
keyboard and escapes only if 
a function key or the ENTER 
key is pressed. Function keys 
pressed with ALT, CTRL or 
SHIFT have the same effect 
as ENTER but they could be 
used to increase the number 
of menu choices available. 

The filenames shown in 
lines 230 to 250 will, of 
course, need to be changed 
to represent files which 
exist. Other options worth 
considering are to change 
the window settings, send a 
file to be printed or back-up 
a file — using INPUT to obtain 
a file name. If the routine 
becomes too complicated, it 
might as well be loaded asa 
program. 

Listing two shows a 
replacement for the SAVE 
command, SAVE is not 


The first two lines fill the 
space to the left of the string 
with spaces, whereas the 
third prints directly from the 
position specified in the AT 
command. The difference is 
made obvious by changing 
the STRIP colour or by 
activating the UNDER option. 

Any value can follow TO 
without causing an error but 
the interpreter treats 
irrational values in strange 
ways. Any number equal to 
or less than the current print 
position causes a single 
character space to be 
printed. That is slightly 
annoying at the beginning of 
a line, where: 

PRINT TO O; “HELLO” 
prints the string beginning at 
the second character space 


Sinclair/QL World September 1986 


OF 


DEFine PROCedure STORE 


LOCal drive, names, files 


PRINT#Q, 
INPUT#Q, 
FOR drive = 1, 2 
files = ‘mdv’ 
DELETE files 


OPEN_NEW#3, files 


PRINT#3, 
PRINT#3, 
LIST#3, 
PRINT#3; "CLS#@: PRINT#@, ‘" 
CLOSE#S 

NEXT drive 


2 70 


PRINT#@, 


particularly friendly because 
it is cumbersome to use, 
especially if previous files 
are deleted and a back-up 
saved on another 
Microdrive. A typical saving 
operation might look like 
this: 
DELETE MDV1_FILE 
SAVE MDV1_FILE 
DELETE MDV2_FILE 
SAVE MDV2_FILE 
a total of 60 keypresses, 
including four ENTERs. 
STORE, then, has the 
following advantages. it 
takes the pain out of 
deleting, saving and 
backing-up program files; it 
provides an on-screen 
prompt during loading and 
it date-stampes the program 
so that you know when you 
last amended it— not bad for 
a 15-line procedure. 
Placing direct commands 
in program files has a 
disadvantage in that there is 
no longer any difference 
between LOAD and LRUN 
and between MERGE and 
MRUN. The example in 


THE 


on the line. Numbers greater 
than the line length force a 
line feed. Fractions are 
rounded to the nearest 


’ whole number. 


TO also appears in COPY 
statements, LINE commands, 
the turtle graphics TURN to 
command and the dreadful 
GO TO command. With such 
ubiquity it is not surprising 
that the interpreter can 
become a little confused. In 
many cases TO can replace 
a comma with no ill-effect. 
Try this: 

WINDOW 200 TO 100 TO 
30 TO 50 

While it might not 
produce an error, it is 
obvious nonsense. If a 
procedure, however, was 
defined to print a range of 


& drive & ‘_ 


"“CLS#0: PRINT#@, ‘LOADING " 
"1 REMark File saved :- " 


“STORE complete’ 


MONTH 


“STORE current program...~* 
‘Enter file name >’ 


! names 


’ & name$ 


& name & """ 
&® DATES 


& name$ & “" LOADED...°" 


45@ END DEFine STORE 


listing two will not run 
automatically when it is 
merged or loaded. To 
overcome that weakness, 
add a direct RUN command 
immediately before the file 
is closed, i.e.: 

415 PRINT #3, ‘RUN’ 


STORE should be 
entered, tested and then 
re-numbered with very large 
line numbers so that it can 
be merged into programs 
being developed without 
over-writing other lines. 
While the procedure could 
be modified to take 
parameters representing 
start and end-line numbers, 
which are optional with the 
SuperBasic SAVE statement, 
it is unlikely that refinement 
would be worth the effort. 


This article has not 
exhausted the uses for 
creating program lines and 
placing direct commands in 
program files. Other 
applications of these 
techniques will be dealt with 
later in the series. 


numbers, like this: 

100 DEFine PROCedure 
WRITE (START, FINISH) 
100 FOR x = START TO 
FINISH: PRINT !X! 

120 END DEFine WRITE 
It could be called with 
either of the following 
statements: 


WRITE 1 TO 50: WRITE 
5,10 

In that example, using TO 
increases the readability of 
the statement. 


Commas and TO are not 
completely interchangeable. 
For example, these 
statements have very 
different effects: 


FOR X = 1 TO 10: PRINT X 
FOR X = 1,10: PRINT X 


STRONG COMPUTER SYSTEMS 


BRYN COTTAGE, PENIEL, CARMARTHEN, DYFED SA32 7DJ. TEL: 0267-231246 


— 128K QL Computer + Hopper + crazy painter 
— 640K QL Computer + Hopper + crazy painter 
— Sinclair Vision QL colour monitor 

— 128K QL Computer + Vision QL monitor 

— 640K QL Computer + Vision QL monitor 


All Systems supplied with convert utility and boot menu 


NEW SUPER Q-BOARD BY SANDY JUST 
3.5” DUAL DRIVES + SUPER Q-BOARD 
MIRACLE SYSTEMS 512K EXPANDERAM 


CLEANING KIT IN CARRYING CASE 
10 DS/DD 3.5” DISKS BOXED 


ALL PRICES INCLUDE VAT + CARRIAGE 


For your QL communications needs — covers all the major inter- 
national FSK modem modes permitted in UK 


300/300 baud CCITT V21 Answer & Originate 
1200/75 baud CCITT V23 main channel 
75/1200 baud CCITT V23 back channel 
1200/1200 baud half duplex packet system 


Auto-dial and Auto-answer 


Centronics interface with 6KB buffer — for serial to centronics 
conversion or for printing incoming modem data. 


Comes complete with communications software for the QL — Prestel 
emulation, 40/80 column terminal emulation, text file transfer. N.B. 
software works with expanded QLs. 


Onboard microcomputer ensures correct data exchange with QL 
and provides split baud rates for V23 modem modes. 

The Astracom 1000 is controlled by software commands from 
keyboard or the communications software provided. Automatically 
reports mode and status and has inbuilt help menu. 

Auto-scan feature puts modem in correct mode to respond to 
incoming carrier. 


The Astracom 1000 has its own power supply and can be used with 
any computer that has a serial port, and so will work with a successor 
to your QL. Astracom intend to provide communications software 
for a wide range of computers. 


The Astracom 1000 is 7 inches wide by 8 inches deep and 1.5 inches high. It comes complete with software, manual and serial cable, all for 


PHONE OUR HOTLINE 
FOR DETAILS NOW! 


Tel: 0793 473697 


Astracom, 13 Beechwood Road, Uplands, Swansea SA2 OWL 


Not BT approved, 
BT approval applied for 


Prices include VAT & Carriage 


Astracom 1000 Multistandard Modem £198.95 
Q Term terminal emulation with error correcting file transfer facility £19.95 
Citadel Membership QL bulletin board with free down-loadable software £19.95 


Please make cheques payable to Astracom 
For free data sheet or further information phone 0792 473697 anytime 


ollowers of the QL World 
series The Unpredictable 
Micro — February, March, 
April and June, 1986 issues 
— will have had a chance to 
prepare themselves for the new Digital 
Precision blockbuster release, Profes- 
sional Astrologer. Newcomers wishing 
to acquire additional background will 
find reading those reports by John Dice 
and Phil Staniforth worthwhile. 

Fanciful or fashionable notions aside, 
large numbers of respectable groups of 
serious-minded people, scientist and 
layman alike, are examining the validity 
of astrology. Among those are a diver- 
sified range of disciplines whose 
concerns include statistical research, 
vulcanology, geological aspects of 
earthquakes, biology and meteorology, 
to name a tiny sample. 


Michel Gauquelin, a noteworthy 
French statistician, in his book Astrology 
and Science, observed from a sample 
of 25,000 births throughout Europe in 
a 20-year period that a_ significant 
number of individuals had achieved 
prominence in particular professions 
with a common factor — certain planet- 
ary configurations were evident at the 
time of their births which were relevant 
to particular professions, where either 
prominence or notoriety was achieved. 
Encouraged by his findings, he has con- 
tinued, as have others, in an attempt to 
verify or refute his findings, to increase 
his database by a considerable margin. 

An honest astrologer presents his 
craft as if planetary influences, to use 
an anology, were like a tide. Although 
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some influences are stronger than 
others, they, in the final analysis, are 
only influences and not some mysteri- 
ous and unopposable force. When 
astrologers speak of ‘malefic’ or ‘ruling’, 
they are generally referring to the con- 
ventions observed in astrological nota- 
tion. 

Rather mundane but pertinent 
examples of extra-terrestrial influences 
are often cited as examples of planetary 
effects. From one of those is derived 
the term lunacy. However derisive, it is 
a phenomenon which is often observed. 

Anyone wishing to dispute the validity 
of the astrological process using its 
failures as supportive evidence should 
examine weather reports as viewed in 
a historical perspective. In spite of all 
the expensive technology providing a 
method of prediction for an entirely 
physical phenomenon, its frequency of 
inaccuracy leaves much to be desired. 

The Professional Astrologer has 
evolved from the Super Astrologer 
series of programs; it has been ex- 
panded to provide the most com- 
prehensive system available for any pre- 
sent or foreseeable micro — and most 
of the minis. When up and running the 
rather spartan menu produced by the 
boot gives little indication of the feature- 
packed programs available, which must 
be experienced to be believed. 

The initial options from the first boot 
menu for the complete Professional As- 
trologer package, which is acces- 
sable in modules, are the Astrologer 
program, the Astronomy program, the 
Defaults editor and the Text editor. 


PREDICTABLE 


Who could have foreseen 
that Digital Precision 
would launch an 
enhanced and expanded 
version of Super As- 
trologer on an unsuspect- 
ing universe. Ron Massey 
reviews Professional As- 
trologer. 


Taking each menu item in reverse 
order, this rather good text editor, which 
can also be used for editing any text 
files, is used to alter or produce any of 
the text tables used by the programs 
and from which is gathered the data for 
the interpretations. 

Although both Astrologer and 
Astronomer have their own temporary 
default editors, the Defaults Editor is as 
comprehensive as it is possible to be 
and caters for every conceivable con- 
tingency for permanent alteration of 
default values of the main programs. 

A comprehensive range of printer 
types can be installed for both charac- 
ter, with the facility for printer re-defini- 


‘tion of each QL character, and graphic 


printing, in single-or double-density for 
either 8-or 9-wire printing heads; 
planetary symbols (glyphs) may be dis- 
played in either red or white; arcs may 
be displayed as either decimal or 
sexagesimal values. 

Pertinent to the Astrologer program, 
users can Customise symbol represen- 
tation according to personal or prefer- 
red conventions. Full editing of any of 
the glyphs used customarily in astrol- 
ogy, such as the Planetary, the Signs 
or the Aspect symbols is implemented. — 

Any one of six House systems may 
be installed as the default value dis- 
played in’ the natal charts and can be 
altered temporarily from within the 
Astrologer default editor. Remaining 
within the mainstream of astrological 
practice, Professional _ Astrologer 
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includes Placidus, Equalised, Equal 
House, Koch, Regiomantus and Cam- 
panus as its house options. 

Of particular importance to astrolo- 
gers is the calculation of the Aspects. 
The relation of a planet, house or sign 
to other similar features within a natal 
chart; Aspects determine the weights 
and values used in the interpretation of 
any natal chart. 

Traditionally, the proximity of one 
chart feature to another must be within 
a limited range of arc or, as it is more 
generally called, an orb. A conjuction 
configuration, for example, occurs when 
one planet is within plus or minus seven 
degrees of being in direct line with 
another, such as an eclipse. 


From an astrological point of view, 
the degree of influence attributed to the 
orbs varies a great deal according to 
the type of aspect. Professional 
Astrologer includes a complete set of 
Orb values as defaults. For particular 
applications concerning specific 
requirements, they may be altered to 
other values involving closer or wider 
tolerances and may also be assigned 
particular weighting according to the im- 
portance of the influences. 

In addition, special Orb values may 
be assigned to the first, fourth, seventh 
and tenth Houses, Progression 
Aspects, Transit Aspects and Cross 
comparison Aspects. 

User-modified files employeing full 
AND/OR search logic may be included 
in the text files. Whenever the highligh- 
ted configurations occur in a natal chart, 
those files will be included in the 
interpretative analysis. A __ typical 
example, the AND/OR logic employed 
may include one or more planets 
occupying particular positions in a natal 
chart and may be configured to include 
the presence of any particular relation- 
ship. 

Output from Professional Astrologer 
may be printed or saved as a text file 
for later import to Quill. At each stage, 
users have the option either of printing 
the contents of a screen or continuing 
to the next option selected at the input 
stage which includes text, graph and 
aspects pages for each of the Radix, 
Progression, Transit or Comparison op- 
tions. 

Print and hard-copy options are dis- 
tinguished by the former being used for 
text printing and the latter for screen 
dumps. Screen dumps may be made 
in either of two formats; slightly faster, 
the proof-dump is graphically uncor- 
rected in that the printed natal chart 
appears as a vertical ellipse; the second 
option corrects screen-to-printer dis- 
crepancies temporarily by stretching the 
screen, which prints the chart as a 
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circle. Although each stage offers the 
option of continuing to the next set of 
calculation representations or printing 
the contents of a screen an additional 
option, at the initial input stage, offers 
the option of Autoprint in text and either 
corrected or uncorrected screen dumps 
at the completion of each screen page. 
Almost eclipsed by the power of 
Astrologer, Professional Astronomer is 
no less packed with features aimed at 
precise observation oof astronomical 
phenomena. 
Astronomical 


calculation options 


available include Horizontal, Ecliptical . 


and three configurations of Equatorial 
projection. 

Astronomer offers the options of 
viewing the eclipse and phases of the 
inner planets — out to Mars — a 
Planetarium display of both hemis- 
pheres and zenith with a cursor to iden- 
tify any of the planets present and, in 
common with Astrologer, a view of the 
solar system at the selected time and 
location. 

A feature to the view of the solar 
system is the auto-run option, which will 
advance the movement of the planets 
at a daily rate from the time selected. 

Overall, Professional Astrologer is 
extremely efficient in terms of the way 


it utilises the QL memory as well as its 
file space requirements. It would have 
been relatively simple to aim it at 
expanded QLs, utilising disc-based 
storage — but it is available on either 
Microdrive cartridges — four of them — 
or on disc andis entirely compatible with 
128K QLs. Interpretative text files for 
the Aspects, Houses and Signs, which 
may be altered or added to, take up 
some 190K of file space. 

Two comprehensive natal data files, 
in compressed form, are included with 
the package. Before going into more 
detail regarding those files, it might be 
as well to describe the manner in which 
discs save files. 

Each natal file occupies about 65 
bytes. If each of those files were to be 
saved individually, they would occupy 
three sectors — 1,536 bytes — each on 
a disc. That happens because of the 
way discs work; anyone wishing to read 
the reasons for this particular quirk 


should refer to Colin Opie’s series in the 
January to March issues of QL World. 

Astrological interpretation relies heav- 
ily on calculations accuracy of planetary 
positions. In this, Professional As- 
trologer must be rated very highly. The 
five most difficult planets for which too 
calculate positions are the Moon, Jupi- 
ter, Saturn, Uranus and Neptune. 

Testing the Digital Precision claim for 
its accuracy, positions were taken from 
Raphael's Standard Ephemeris for 
January 1 froma random 47-year selec- 
tion between 1831 and 1974. One of 
the problems encountered by using 
other ephemeris collections is that the 
majority of them have been produced 
in retrospect, while Raphael calculations 
are contemporary. 

One of the peculiar problems as- 
sociated with production of digital data 
is that people usually rely on the figures 
produced by various systems — time 
being one of them — as absolutes. To 
keep everything in perspective, if you 
were to make the smallest pin-hole 
possible in a roof which is 50ft. above 
a floor, lying on your back the area 
visible through the pin-hole would be 
approximately equal to one second of 
arc. 

Comparison figures support the Digi- 
tal Precision claim to one minute accu- 
racy within this century for all of the 
planets with the exception of the Moon, 
whose position varies between 
maximums of +3’30” to -4’42” of arc. 

With a typical 33 minutes of arc per 
hour movement, the Moon’s physical 
displacement by this discrepancy 
amounts to something in the range of 
plus nine minutes to minus seven mi- 
nutes of time. Very few people would 
be brave enough to place a birth time 
positively within that range of accuracy. 

If all of the hard-copy options are ac- 
cepted, as supplied Professional As- 
trologer will provide typically a complete 
11-page report for any selected date; if 
all of the options for Transits, Progres- 
sions and Comparisons are printed, re- 
ports would well exceed that. 

Catering for those interested in main- 
stream astrology, Professional As- 
trologer is a one-of-a-kind package. 
Descriptions such as superb, ultimate, 
excellent are barely adequate. Every re- 
quirement for both individual and 
specialised applications such as 
historical research, individual delinea- 
tions, statistical research and many 
others is well provided for. 

In common with Super Astrologer, 
Professional Astrologer is super- 
charged, which reduces loading and 
processing time. That this massive 
program is aimed at users of unex- 
panded QLs using entirely Microdrive- 
based systems in entirely to the credit 
of Digital Precision. 
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TROMBFORT LTB, computer Accessories 


odinn Bags Avis Dade Ae Menthe th Aichi ethene 


QL SOFTWARE 


= 
E MAILING LIST 


£24.95 


This program will allow you to quickly store 
and retrieve names and addresses from within 
ARCHIVE. Features include single key functions, 
prints address labels, exports files to Quill for 
list; also compatible with our stock- 


mailin 
control file. 


Ss 
STOCK CONTROL £24.95 


Keeps a complete record of all your stock 
items including retail price, trade price, 
minimum order level, iterns on order and many 
other features. 


Be QL APPOINTMENT/ 
DIARY £24.95 


Records appointments dates and times, can 
be used as diary dentist, doctors, hairdressers, 
service engineers. Program allows 26 users with 
up to 40 appointments per day. Features 
include search for day, search for next spare 
time, search for client's appointment. print out 
all day appointments and many others. 


QSPELL £19.95 


Spelling checker for Quill supplied with 25000 
words, checks on A4 page in 24 secs, users 
dictionary and auto leams words. 


k PAYROLL £63.25 


Calculates weekly, monthly or 4 weekly payroll 
full tax calculations, coin analysis and 
payment rounding. 


INTEGRATED 
ACCOUNTS £89.95 


This new program from Sinclair will allow you to 
produce full profit and loss account. 


ARCHIVE 


Our team of programmers are able to write 
programs to your requirements, phone for 
further details. 


@ >] QL KEY DEFINER £9.95 


For those who use Quill or SUPERbasic this 
program is a must allowing you to define up to 
2k on each key i.e. simply press ALT and “S” and 
the program will be saved onto the microdrive 
and overwritten, press “ALT” and “P” to print 
current file, press ALT and “G” to go to top of 
file, ALT and “B” to go to bottom of file, ALT and 
“D” will type in “Dear Sir’. You can type a 
complete paragraph, phrase or letter by 
pressing one key 


In basic pressing F5 will bring back the last line 
typed; you can define keys for EDIT LIST etc. 


QL CALC £9.95 


This program makes use of the QL’s multi tasking 
facility enabling you to press CTRL and any other 
key to give you a full calculator; having used the 
calculator you can return to the current program. 
This program can be used with Quill, Archive, 
Abacus and Easel. Features include mouse type 
operations, keyboard overide, memory and all 
ihe standard type features very useful in a busy 
Office. 


TRANSFORM LTD (DEPT. QL ) 


QL SWITCH £14.95 


This program will allow users with extra memory 
to run QUILL, ARCHIVE, ABACUS and EASEL at 

the same time, or two ARCHIVE programs and 
QUILL. Pressing a key will allow you fo suspend 


the current program and switch to the new 
program. 


RAM DISC £14.95 


Users with extra memory will with this software be 
able to set up a ram disc: programs can then 
be instantly saved and re-loaded. A printer 
spooler is also included to allow you fo print 
whilst still using your computer, 


at TOOL KIT £9.95 


This program will copy all or selected files, 
delete one or selected files, display file to 
screen, change file file name. format, and print 
multiple copies of Quill files 


MEMORY EXTENSION 


MEMORY EXTENSIONS 


. £125.00 


QL VISION 
215.00 


PHILIPS 7502 
75.00 Fr 
Ex VAT a 


ex vat inc vat 


215.00 247.25 
75.00 86.25 


AL Vision 

Philips 7502 black and green 

Connect your Spectrum to 

the QL; Vision Monitor 39.14 45.00 
Please add £5.75 for delivery of monitors. 


10 CARTRIDGES 
17.50 


20 CARTRIDGES 
35.00 
Microdrive Cartridges 
Microdrive storage box with 10 cartridges 
Microdrive storage box with 20 cartridges 


Add £1.00 post 


£1.99 
22.45 
39.95 


DOT MATRIX 


Seikosha SP1000 
Epson LX80 
Taxan Kaga 


Inc VAT 


202.40 
228.85 
241.50 


DAISY WHEEL 


Brother HRIO 
Brother HR15 


245.80 
349.44 


282.67 
401.86 


Please add £5.75 for delivery of printers. 


DOUBLE 
SIDED 

DOUBLE 
DENSITY 


ae FOR £30.00 


Ex VAT Inc VAT 
6.00 6.90 
10.00 11.50 
16.95 19.50 


QL to Spectrum 
QL RS 232 
Centronics interface 


ACCESSORIES 


Centronics interface 26.04 29.95 
RS 232 lead 10.00 411.50 
Monochrome monitor lead 5.00 5.75 
M1009 tractor feed 13.20 15.18 
LX tractor feed 18.00 20.70 
2000 sheets of continuous paper 11.29 12.98 
1000 labels 5.78 6.65 
Microdrive cartridges 1.73 1.99 
10 x 31/2” disc 26.08 30.00 


We also stock a wide range of ribbons, 
daisy wheels etc. 

Please add £3,00 for post and packing of 
paper. £1 for labels. 


DISK DRIVES 
~~ 


Technology Research Delta 112.60 129.00 
Technology Research Delta64 152.47 175.00 
Technology Research Delta128 173.49 199.50 
Cumana interface 69.48 79.90 
720k single 3'2" drive 121.65 139.90 
1440k dual 32” drives 210.00 241.50 


Cumana interface + single drive 194.17 219.85 


Cumana interface + dual drive 279.48 


Holds 40 disks. 
Lockable 
Tinted removable lid 


HOLDS 40 31 DISKS 
Add £1.00 post 


Epson LX80 
199.00 ex vat 


01-658 6350 


Mail order only. 24 West Oak, Beckenham, Kent. BR3 2EZ 
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In this, the concluding part 
of our Abacus feature, 
Mike James looks at 
techniques of presenting 
information, paying par- 
ticular attention to print- 
ing, booting and export- 
ing. 


nthe three earlier parts of this series 
we have looked at the way spread- 
sheets are constructed but that is 
usually only part of a complete 

application. A spreadsheet has to 


supply information to be of use and that - 


means either printing it out, drawing 
graphs from it or using it in combination 
with other software packages. In the 
final part of Abacus Art we look at 
techniques for presenting information 
and exporting it to other programs. As 
well as these topics, the BOOT program 
is examined with an eye to making 
alterations to the way Abacus is run. 

In principle, printing a spreadsheet is 
easy. All you have to do is use the print 
command F3 P but in practice getting 
the layout you want can be a little more 
difficult. The first thing to check is that 
the printer you are using is installed cor- 
rectly. That is done in exactly the same 
way for all the Psion applications pack- 
ages. From SuperBasic, type Irun 
Mdv1_install_bas; that runs a menu-dri- 
ven program which will allow you to 
specify which printer model you are 
using. The result of the install processes 
is a data file called install_dat which, so 
long as it is present on the same Micro- 
drive cartridge, will be used by Abacus 
to determine what control codes to 
send to the printer. 

Installing a printer driver is important 
but you will find that it does not help 
with many of the format and layout prob- 
lems of printing a spreadsheet. If you 
change the specification of the line or 
page length in the printer driver, Abacus 
will still print your spreadsheet as if you 
were using a standard 80-column 
printer with 66 lines to a page. If you try 
to. print-out a 
Abacus will cope by dividing it into seg- 
ments which will fit on a standard A4 
page. 

That is very useful but some printers 
can handle 132 characters to a line, 
which makes it possible to print whole 
spreadsheets in one go. To change the 
way Abacus prints spreadsheets you 
have to use the Design F3 D command. 
That gives you the option of changing 


Sinclair/QL World September 1°°°6 


large spreadsheet, » 


the printer width, lines per page, line 
spacing and whether or not a form feed 
should be used between pages. If you 
change any of those settings, Abacus 
will lay-out your spreadsheet accord- 
ingly, irrespective of what the printer 
driver says. Some of the other Psion 
applications programs are not so disre- 
garding of the printer driver. 

Although there are no explicit com- 
mands for using sophisticated printer 
features, such as bold, italic or underlin- 
ing, you can make use of them in a 
spreadsheet by using the chr function 
to send the appropriate contro! codes 
to your printer. If you are using an Epson 
FX-80 printer or a compatible model, 
putting chr(0)+(27)+"E” into a cell will 
switch on bold _ printing and 
chr(O)+chr(27)+“F” will switch it off. 

You can use that device to make a 
main title — printed-out in bold; the only 
problem is that the cell to the left of the 


‘THEABACUS 


~ 
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title will show on the screen as “E” and 
the one to its left as “F”. While on the 
subject of using the chr() function it is 
worth mentioning that you can see the 
whole of the QL character set by enter- 
ing col=chr(row()) FROM 1 TO 255. 
You cannot really use the chr() 
technique to send initialisation codes to 
the printer because even if you place 
the chr() expression in Ai, the top 
border would be printed before the in- 
itialisation codes reached the printer. 
The solution is to use the PREAMBLE 
CODE in the printer driver, and possibly 
the POSTAMBLE CODE to re-set the 
printer after printing the spreadsheet. 
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The PREAMBLE CODE is a sequence 
of codes sent to the printer before any- 
thing is printed so if you wanted to set 
the printer into a condensed typeface 
before printing extra large spread- 
sheets, specify the necessary codes in 
the PREAMBLE. 

All four Psion packages can import 
and export data using the Microdrives 
as an intermediary. When using Abacus, 
the most common requirement is to see 
a visual summary of the data. You can 
construct a crude histogram using the 
rept function as explained in part two 
of this series but if you want high-quality 
graphics there is no choice but to export 
the data to Easel. The export command 
is one of the options in the Files com- 
mand-type F3 F E. When you export 
data to Easel, by rows, the section of 
the spreadsheet you export must have 
the following format: 


text lab1 lab2 lab3 lab4 Sie 
data2 data3 data4 $3 


data2 data3 data4 te 


var1 data‘ 


var2 data 


The text in the top right-hand corner 
is ignored by Easel but it must be pre- 
sent or the first column of data will be 
ignored in its place. The text in the top 
row, lab1 and so on, is used to label the 
data values. They are used as labels for 
the bars of a bar chart or the segments 
of a pie chart. The data values in the 
second row are treated by Easel as 
values of a single variable called var1 
which the data occupies in the 
spreadsheet, to be graphed. The third 
and subsequent rows are treated as the 
values of other variables to be rep- 
resented in the same graph. If you have 
the following spreadsheet: 


Profits 
year_1985 


1st 2nd 3rd 4th 
300 200 500 300 
200 400 300 100 


year_1986 
with the text Profits in cell c3 you could 
export it to Easel with the command: 
>export to easel, range c3:g5, by rows, 
to profit. 


Figure 2. 
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Notice that the variable names are 
“year_1985” rather than just 1985 be- 
cause Easel variable names have to 
start with a character, not a number. 
Once in Easel you can import this data 
by the command: 
>Files: import from profit 
and that will produce a graph of the 
profits for the four quarters which, after 
alittle editing, can be seen in figure one. 


The main difficulty about using Easel 
with Abacus is that usually you have to 
extract the figures from which you want 
to draw a graph from a larger spread- 
sheet. The easiest way is to make a 
copy of the desired rows or columns in 
an isolated part of the spreadsheet. That 
is amessy process but the only alterna- 
tive is to design the spreadsheet so that 
the part which holds the data intended 
for graphical display is in the form given 
and that usually results in a rather odd- 
looking spreadsheet. 

The amazing thing about using 
Abacus, or any good spreadsheet for 
that matter, is the way that you can 
achieve surprising results with only a 
little ingenuity. Would you believe it is 
possible to use Abacus to draw a two- 
dimensional plot of a function like: 
exp(-)x°+y’) 


prio eeeo ooo erris 


_of plotting this function in figure two. 


° 
2 


otrrtveoeo eo ee tevnrro 


It is possible and you can see the results 


Once you have the basic principle, plot- 
ting any two-dimensional function is 
simple. The first problem is how to 
generate suitable values for x and y over 
an area of the grid. That is solved by 
using the functions row() and col() 
scaled suitably for the range over which 
you want the function worked out. If you 
enter the function: 
exp(-(abs((row()-8)/8) 2+abs 
((col-8)/8)2)) 

into cell A1 and then use the Echo com- 
mand to replicate it over the range 
A1:P16 you will see a table of values for 
the function for x and y in the range -1 
1OEe 

The next problem is to change this 
table into a shaded plot of the function. 
That can be achieved by first converting 
its result to an integer in the range 1 to 
6 and then using that to select one of 
six plotting characters. As the function 
being plotted varies between O and 1, 
changing the function in A1 to: 
int(6*exp(-(abs((row()-8)/8 2+abs 
((col()-8/8) *2((+1) 
results in a table of numbers between 
1 and 6. Selecting one of six characters 
on the basis of the result in each cell 
can be achieved by use of the index 
function. Remember that the 
index(col,row) function will return the 
contents of the cell in the specified 
column and row. 

If you set up a table of plotting charac- 
ters of the correct density, say Space, 
-,+,*,0,X, in column S —i.e., column 19 
— then index (19,result of function) will 
return the appropriate plotting charac- 
ter. Thus the function in A1 becomes: 
index(19,int(5*exp(-(abs((row()-8)/8) 
2+abs((col()-8/8) 2))+1)) 

With that change all that remains is to 
reduce the width of the columns used 
to display the function to be a single 
character wide using the grid com- 
mand. You can try plotting your own 
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functions using the same technique but 
be warned — if you see a very compli- 
cated function you might have to wait 
a long time for the results. 

Sometimes you need to combine the 
information in anumber of spreadsheets 
to produce a single summary spread- 
sheet. If you maintain a monthly sum- 
mary of profit and loss it is useful to be 
able to combine a year’s worth of such 
spreadsheets to produce a profit-and- 
loss statement for the entire year. You 
can combine a spreadsheet stored on 
Microdrive with one displayed on the 


Figure 3. 


WINDOW 512,256,606, @:CSIZE 


AT 7,15: INPUT d$ 
IF LEN(d$) <>14 THEN 


SDATE d$(1 TO 4&),a¢(5 TO 


IF A$(1)<>"y" THEN GO TO 
CLEAR 


AT 6,4:PRINT “copyright 


EXEC_W mdvi_abacus 
OPEN #1,scr:OPEN #2,s8cr 


screen by using the merge, F3 M, com- 
mand. 

You can choose to add or subtract 
spreadsheet entries. Each cell in the 
spreadsheet stored on Microdrive is 
compared to the corresponding cell in 
the spreadsheet displayed on the sc- 
reen and if they both contain numeric 
data or valid formulae their contents are 
added or subtracted. The resulting 
spreadsheet contains only numeric data 
in cells which have been affected as any 
formulae they contained are overwritten 
by the results of the merge. Obviously 
it is important to design or modify 
spreadsheets which are to be used in 
a merge operation so that they are laid 
out in exactly the same way but, apart 
from that restriction, merging is a very 
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AT 5,16:PRINT “Date and time= ";DATE$ 
AT 6,15:PRINT “yyyymmddhhmmss" 


AT 10,2:PRINT “wrong format™:GO TO 20 


4$(9 TO 186),d¢(11 TO 12),d%(13 TO 14) 
AT 8,16:PRINT “Date and time="; DATES 
AT 9,8:INPUT "Is the date/time correct (y/n)";A$ 


WINDOW 512, 256,8,0:CSIZE 2,1:CLS 
AT 2,10:PRINT “LOADING QL ABACUS" 
AT 4,13:PRINT “version 2.00" 


AT 8,13:PRINT “spreadsheet” 
CLOSE #1:CLOSE #2:WINDOW #0,460,26,35,215 


useful and easy-to-use operation. 

The Abacus program is loaded into 
memory by a SuperBasic program cal- 
led BOOT. The program prints a mes- 
sage that Abacus is about to be loaded, 
sets up an appropriate window and then 
loads Abacus. The BOOT program can 
be modified to carry-out any initialisation 
required before Abacus is run. The 
Abacus date() and time() functions will 
return the correct time only if it has been 
set, using SuperBasic, before Abacus 
is run and it is all too easy to forget to 
do that. 


1,1:CLS 


6).a$(7 TO 8), 
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lf you use the BOOT program given 
in figure three you will be asked for the 
date and time automatically each time 
you run Abacus. That is particularly use- 
ful when used in conjunction with a 
spreadsheet such as the freezer con- 
tents record given in part two. Another 
possible use of the BOOT program is 
to define any special characters needed 
within a spreadsheet. 

As a final example of the range of 
which a spreadsheet is capable, the 
spreadsheet shown in figure four will 
set you a multiplication problem and tell 
you if the answer is correct. The same 
methods could be applied to a range of 
games and quizzes, so the details of 
how it works are worthy of attention. 


Figure 4. A spreadsheet which 
tests tables. 
A Be CeD Ena 
Test on the 15 times table 


G H 


15* 4= 60 
Correct 


type F3 X for another problem 


The first problem in setting a question 
is how to generate a random number 
in agiven range. Abacus has no random 
number generator but it has a clock and 
for many purposes the reading of 
seconds from the system clock can be 
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used as a fairly random number. Ex- 
tracting seconds from the time() function 
is a matter of using string slicing, i.e., 
time() (7 to 8) will return the last two 
characters of the time string. 
Converting the resulting two-charac- 
ter string to a number in the range 1 to 
10 can be achieved using the val func- 
tion, giving: 
int(val(time() (7 to 8))/6+1) 
as the random number generating func- 
tion which should be entered into cell 
D3. The text shown in figure four 
should be entered into cells A1, C1 and 
C6. The number of times table to be 
tested should be entered into cell B1. 
That can be changed at any time. All 
that is left is to set the problem and 
check the answer. Setting the problem 
is done by entering the following for- 
mulae into the cells indicated: 


Formula/value 


askn(“whatis” +str(B3,3,0) 
+'*" +-str(D3,3,0)) 
if(F8=B3*D3, “Correct”, “Incorrect”) 


Notice that the random number for- 
mula has already been entered into DS. 
The function which does all the work is 
the askn function in cell FS. It asks the 
multiplication problem each time the 
user types F3 X and enters the response 
into FS. 

The use of askn is interesting because 
it goes beyond the manual definition of 
how it works by including functions and 
cell references as part of the question 
it asks. After the user has responded to 
the question, the formula in cell F4 
compares the response with the correct 
answer and prints “Correct” or “Incor- 
rect” as appropriate. The way in which 
the IF function works was explained in 
the second article in the series. 

This simple spreadsheet is capable 
of being extended to include a count of 
how many correct answers there have 
been and to repeat the same question 
until it is answered correctly but these 
modifications are left to the reader as 
interesting exercises. 

There are only three main micro- 
computer applications — word proces- 
sing, database and spreadsheet. In the 
Psion applications packages we have a 
good foundation for all three and a good 
graphics package included. The only 
real difficulty in using Abacus is the 
amount of time it takes to import and 
export data using the Microdrives. With 
more memory the solution to the prob- 
lem would be to use an integrated pack- 
age similar to Lotus 1,2,3 but until 
someone writes such a program | will 
be very pleased to continue using 
Abacus. 
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Written by Tony Tebby. Uy S 
OVER 118 COMMANDS INCLUDING FULL SCREEN EDITOR, PRINT USING, LAST LINE RECALL, i 
ALTKEY, JOB CONTROL, FILE HANDLING, DEFAULT DIRECTORIES, EXTENDED NETWORK tal OPEN 
ee Pic ee TO BE SHARED BETWEEN QL’S.) NEW BROACAST PROTOCOL. 9am-5pm Mon-Thu 
prom Cartridge Version ..... @£ 34.50d | TONY TEBBY QJUMP | Q) 7 
Configurable Version on Microdri @£ 34.50d USMS EVACRTIUEM Software Sam-4pm Fri-Sat 
: Configurable Version on 3.5” Disc . @£ 34.50d \ 
DOT MATRIX PRINTERS = &} G 
Kaga Taxan 810 with NLQ.... @ £247,254 | COLIN OPIE VIDA REBUS | 
loti oto war taite oe we COLIN OPIE VIDA ia=10 Software Onie 
Printer Switcher 2to1. @E£ 34.50d renee a & eee Oe aan 
rinter Cable 1mt...... £ 7.82c Toss Assembler UC 
Printer Cable 1.5mt OE 9.20c Cross Assembler 8048 Series .. @E£ 34.50c 800 ST ALBANS ROAD, 
Ribbon Hi-Sec KP-R .. ~@E 690c  FPRRAIEEN 85 Characters (Inc lead) GARSTON, WATFORD, 
| MAGNETIC MEDIA | MEDIA Philips BM7502 Green Hi-Res .. @£ 89.70a HERTS. WD2-6NL 
Microdrives (Pkt 4) .... @£ 4,280 Philips BM7522 Amber Hi-Res . Ge es 
Microdrives (per 10) .. @£ 18.40c Philips CM8533 Colour Med-Res . @ £289.80a Tel: 0923-6721 02 
3.5” (each) ....... @E£ 391c Hantarex HX-12 Green Hi-Res .. . @E 79.50a = 
3.5” (per 10) ... @E£ 33.10c Hantarex CT9000 Colour Med-Res ............... @ £199.50a 
5.25" D/S D/D (p 2 v- @E 13.80¢ AA folie]; 85 Characters (Inc lead) 
OTHER PRODUCTS Philips €T2016 16” @ £294,40a 
Sate etd (each) ws. @E 9.20c Philips CT2216 16” Remote . ide @ £322.00a 
rom Cartridges (per 5) ... £ 34.50 a . 
Eprom Castrdaes ie ee GE arabe (Philips/Pye TV's Only) 
QEP Ill Advanced Eprom Prograi @ £115.00d Conversion Kit (D.1.Y) .... @é€ 57.75d 
Eprom 2764 250n/s 8K..... @£ 2.53¢ Factory Conversion @é£ 80.50a 
Eprom 27128 250n/s 16K . w» @E 3.45 
Wide range of Connectors & : ; 
QL COMPATABLE COMPUTERS en ee oe @E£ 2.60c 
QUUMP/SANDY QLT: Available October 1986 hee aging la Se ore 
PLICE ADDIOK sassscsnssssssrnseeereee @ £688.85a RGB 8-7 pin DIN (Hitachi) . /@E 5.29c 
Vailable from Stock August 1986. i z. : ; U 
Orginal aL 128 Boar 4 plus RGB 8 pin to SCART (Euro) £ 7.82c 
* Sandy Super 512K QBoard SWITCHING UNITS -XT4 MPUTER 
* IBM-AT Style Keyboard RS232C 2 = : we 
* 60W Internal Power Supply tol a ee. 
* 3 Expansion| slots RS232C 2 to 2 ‘xX’... = 
With Single 3.5” Disc Drive sesseseee @ £599,008 ee 
With Dual 3.5” Disc Drives sesseerueee @ £699,008 mules leme) i245 ALL PRICES INCLUSIVE OF VAT 
By Post. Enclose your Cheque/P.0. made payable to CARE Electronics. Or use ACCESS/VISA. Allow 7 days for 


« @ £259.00a 
@ £249.00 


Also Available in D.I.Y Kit format to 
enable existing QLs to be upgraded ....... se 
Sandy Super 512K QBoard inc Toolkit .... 


delivery. Please add carriage. 
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Exclusive Datalink QL Products 


Datalink SPI — QL. ...essssssseseeeeees £17.95 


BYTEBACK 


ADVENTURES 
Mortville Manor ............ 


Serial to Parallel Printer Interface 
Plug-In-And-Go design, compatible with 
any Centronics Parallel printers. 


Datalink RS-232 QL Printer Lead. ..... £6.95 
QL to 25 Way D Plug printer lead, 
2 metre cable. 


Datalink QL Joystick cscs £9.95 
Quickshot II Style Joystick, 3 fire buttons 
Plug direct to CTL 1 or 2. 


Datalink QL Joystick Adaptor ............ £4.50 


Baron Rouge F 
Gwendoline ... 


Dragonhold . 
West ... 


Super Astrologer ....... . £19.00 3D Slime ...... 
Professional Astrologer .... BJ The Return .. 
Super Media Manager BJ in 3D Land ... 
Cad Pak .. 


Assembler Workbench . 
Metacomco Assembler . £35.00 
Metacomco C .... £85, 


Nucl . £18.00 Knight Fil Metacomco Lisp ° 
yea. tae ER MEREaen BED Convert any Atari/Commodore/Spectrum 
Super . £19.00 Match P% Metacomco Pasc: joystick to use with QL. 


QL Peintre ... Snooker ... 


Typing Tutor “£12.50 Scrabble . BUSINESS Plug direct to CTL 1 or 2 via adaptor. 

ign Designer .. £15.00 Flight Simulat impacct Sales... £46.00 

toes aaa Lands of Haar Ip Pras ger 4800 Prices include Postage, Packing & VAT 
Techni f \ i Impacct Nominal Ledger . . 

GraphiOL ..... . £21.00 Impacct Stock Control .. £46.00 Overseas orders please add 10% to cover 


Cartridge Doctor ... 
Ram Disc ............. 


Quickshot II Joystick ............ £8.00 Miracle Expanderam 256 ................ i 

Joystick Adaptor ...........e £4.50 Miracle Expanderam 512 ................ £115.00 
Transform’ BOX ...ce.eacccc. £4.50 Miracle Centronics Interface ........... £ 19.00 
4 Microdrive Cartridges ........ £7.50 20 Microdrives + Transform Box ... £ 39.00 


Impacct (complete) ..... £180.00 
ASCHIVED ....:essccscsssnsscseee £16.00 


postage 
12 months warranty and 14 days money 
back option with all Datalink Products. 


Dealer, Distributor & Export Enquiries welcome. 
*** NEW CATALOGUE NOW AVAILABLE *** 


ALL PRICES INCLUDE VAT AND FIRST CLASS POST 
TELEPHONE (0636) 79097 FOR PERSONAL ASSISTANCE 
Send Cheque/PO to: 


BYTEBACK  222SPRING GARDENS, 


NEWARK, NOTTS NG24 4UW 
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Datalink UK 

99 Constitution Street 
Leith Telephone for immediate 
Edinburgh, EH6 7AE dispatch 031-554 6040 


All trademarks acknowledged 


Payment by cheque or 
Visa Card Welcome 
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On Tuesday, July 22, the 
winners of our Eidersoft 
mouse competition 


converged on the Sinclair 
QL World offices to collect 
their prizes. 

Our pictures show Gloria 
Graham, Mike Grenville and 
Graeme Archer receiving 
their mice from Ken 
Browning of Eidersoft. 

Twenty-nine-year-old Mrs 
Graham is a team support 
worker at Lambeth Youth 
Aid Project. She uses her QL 
at work to maintain a local 
events database and at home 
to teach herself 


programming. 
Grenville, 36, is a sales 


agent for British Airways. 
His main areas of interest are 
comms, educational 
programming and graphics 
applications. 
Sixteen-year-old Archer 
from Ardrossan in Scotland 
spent eight hours on the 
night train from Glasgow to 
make sure of collecting his 
prize. He is planning to 
study mathematics at 
Glasgow University and saw 
the review of the Eidersoft 
mouse in Sinclair OL World 
and was so impressed he 


competition. 
The other three 


prizewinners are W. S. 
Sambrook of Birmingham, 
O. Carey of Darlington, and 
Fabien Roche from 
Pontcharra, in France, who 
will be receiving their mice 
through the post — RSPCA 
permitting. 

Although the closing date 
for the competition has now 
passed, the surveys are still 
arriving and to date we have 
received nearly 2,000. Sifting 
through the entries it 
appears that most of our 
readers are men aged 
between 25 and 35 in 


technical, scientific and 
administrative occupations. 
It is not surprising that 
many are computer 
programmers or work in 
computer-related 
occupations. 

We are at the moment 
analysing the results with the 
help of Archive. When that is 
done we will be in a better 
position to provide you with 


me magazine even more 


closely in tune with what 
readers want. 


decided to enter the 


THIS IS THE UPGRADE! 


You have an excellent microcomputer . . . 
You have superb programs with brilliant 
graphics — you may spend yours with text or 
design work. 
IT IS ALL WASTED OR NEEDLESSLY HARD 
WORK WITHOUT A HIGH RESOLUTION 
MONITOR and by ‘high’ | mean 585 x 895 
pixels. The QL uses 256 x 256 on 256 x 512 
pixels so why bother with a high res. monitor 
you say. Because the pixels on the screen 
are not the same as from the computer. 
On an ordinary screen pixels get lit that 
should not or extend beyond the point in- 
tended so giving fuzzy images. Also, as the 
spaces beteen pixels are bigger, all colours 
are weak. 
CHROMA 1 shows text and graphics bril- 
liantly. 
DATA: 14” screen; T.T.L. & Linear input; 
green screen mode; Inverse T.T.L. mode; 
£299.00 including V.A.T. and carriage. 
Chromographica 
35, Cliff Road, Hornsea 
N. Numberside. HU18 1JB. 
Phone: 04012 4699 
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WDSoftware 


FOR THE SINCLAIR QL:- 

JOSS £15 on mdv or 514” fip, £17 on 312’ fip 
Forget syntax errors and mistyped names in file commands! Just move a cursor 
and press SPACE. Cursor keys or joystick allow access to up to 8 microdrives 
and all the discs your interface will handle, with up to 150 files on each. Scroll 
& print directories, COPY, DELETE or PRINT any file, select TV or Monitor mode 
before LOADing/RUNning a program. Use keyboard only to set date or label a 
medium. Easy to use with Psion or other software. No silly icons to learn — 
JOSS will tell you what it’s doing! Mass copying/printing utilities and programmer's 
toolkit. Specify disc size, tracks and interface (CST, Cumana, PCML, 
MicroPeripherals) or microdrive only. 


ROFQLT crcecrcrssssssserseseerscenees £11 OM 2 mdvs or 1 314" fip, £9 on 514” fip 
For use with ARCHIVE 2, contains 1300 useful references and a search/print 
program. Find programs, articles and reviews buried in the magazines on your 
shelf! Cheap updates of earlier editions. 


Mdv Extension Cable (8” 
Add ZX Microdrives to your QL. 


Joystick Adaptor .acsussssssssssssssseses as, dee, cae ee £4.99 
FOR THE QL, SPECTRUM, (ALL), BBC & ELECTRON:- 


WD Morse Tutor £4 cassette, £6 mdv or 514’, £8 314" 
Teach yourself to read Morse Code. From absolute beginning to 18 wpm! Feedback 
on screen or printer. Random letters, numbers or mixed, 100 random sentences, 
many helpful features include phonetic speech via Currah Micro-Speéch 
(Spectrum). Discs unsuitable for BBC B+. 

We export hardware and third-party software. Ask for lists 


PAYMENT:- 
In advance, in STERLING on British bank branches, international Giro, Postal 
Order or AG . Add £1 outside Europe for AIRMAIL. 


WDSoftware aw, 


Hilltop, St Mary, Jersey, C.1. Tel: (0534) 81392 
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SECTOR SOFTWARE 


* 0772 454328 * 


TOUCH TYPIST TYPING TUTOR (VERSION 5) 
Touch typist (version 5) is the fastest typing tutor available for the Sinclair QL. It will teach you to type at up to 
211 wmp with a fully interactive keyboard on the screen. It is 100% machine code and has been carefully 
designed to fit in a standard QL whilst still having a host of features crammed into its 85K+ of machine code 
and has a keyboard tutorial to show you the keyboard basics, a demonstration option, 3 teaching modes, 
adjustable targets to 211 wpm and 100% accuracy, very fast interactive keyboard, your results can be displayed 
on an auto scaling graph, results can be saved to drive for future additions, the full lesson editor will allow you 
to alter and customise any or all of the 200 lessons which can then be saved to drive to create a library of 
custom lesson sets, also included is a reward option where if selected, providing you meet the requirements 
you specify, you will be given a 100% Machine Code arcade game as a reward for your progress. Touch Typist 
can be transferred to disc, another Microdrive or RAMdisc with the copy program supplied and can be invoked 
with the EXEC_W command, supplied on Microdrive in a 4 cartridge wallet. 

£11.95 

TOUCH TYPIST received a four star rating on QNET2, the reviewer Nigel Barker said “For all 
people who want to improve their typing this program is a real boon, it is well written and easy 
to use”, 
“Succeeding admirably as a serious course intended for beginners and experienced typists alike 
Touch Typist is a well presented useful utility which includes the professional polish of good 
quality software” - QL WORLD JULY 1986 
And they haven’t seen version 5 yet....... 
Due to the great success of Touch Typist we are offering an update to version 5 to anyone with 
versions 1-4 for £1.00 to cover costs. Simply send your old version stating where purchased 
together with £1.00 and we will send you version 5 by return post. 
Sector software have over 200 products for the QL and will be pleased to assist you with any 
of your requirements. 


** * 


Touch Typist .... 


Super Astrologer .... 


Cartridge Doctor .... 
10 DS/DD 3.5” Discs . 


Squadron ........ 
Zapper with Eag! 


ction from our range 
Phone or Write for more details 
SECTOR SOFTWARE 
45 CHEETHAM MEADOW, MOSS SIDE, 
LEYLAND, LANCS PR5 3UB. 
TEL: 0772 454328 PRESTEL MAILBOX 772454328 
Secess ACCESS AND VISA CARDS WELCOME C= 
2S PLEASE NOTE ALL PRICES INCLUDE P/P. 


MICRODRIVE COPYCAT 


Make copies of those protected programs. 
Will backup most software 


MEDIC DISC SYSTEM UPGRADES 
Additional 256K £79, 512K| 
Additional 3.5” disc drive 


UNDISTORTED SCREEN DUMPS 


“1 to 1 Dump” enables you to get true hard copy 
of your screen images 


RUN THOSE AWKWARD PROGS 


WITH... 
Boot 128K. Fools your expanded QL into thinking 
it has only 128K RAM. Easy to use. ....cccscsssscsssssseees £4.99 


READ AND WRITE MICRODRIVE 
SECTORS... 


with extensions to SuperBasic 
or 1000 lines of assembly source code 


QL DISC DRIVES AND RAM 
Cumana 3.5” drives: Single £141, dual 
Cumana disc interface 
512K Expanderam (works with Cumana I/F) 
Super Qboard disc & printer /F & 256K RAM 

Super Qboard with 512K RAM 
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EN MIRACLE SYSTEMS & 


— 14 day money back guarantee on all products — 
— 12 month warranty on all products — 
QL CENTRONICS PRINTER INTERFACE .......sccsccscossssnseseres £19.50 


* Complete unit including 3 metre cable 
* Plugs into either SER1 or SER2 


ou secescncerccasccnssnsenseseccucconsscsoucsnescussusunsavessssecsurs 


* 3metre cable 


QL JOYSTICK ADAPTOR ..........::::cssscssssssesescssssssssssneeseersserecesee 
* Lets Atari/Commodore/Spectrum joysticks plug into CTL ports 


* Copies whole or part of screen to Epson compatible printer 
QU MODRPTOR  s.ncnsicncsosccsactvcssconssisicusedasesossecesossncsersdescaseeegeest £39.00 


* Links QL to 300/300, 1200/75, 1200/1200 modem 
QL EXPANDERAM 2566 ..........scscscsssesscsssssossesssssssccressesssescensenes £95.00 
%* 256K RAM with through connector for DISK I/F 
QL EXPANDERAM 512 ........scssssssssscnssnsssnssserssasvesnssesesccoreceess £125.00 


* 512K RAM with through connector for DISK I/F 


Configures RAM as disk lookalike 
* Ideally suited to MS EXPANDERAM 
* Enables Microdrive software to run much faster with less wear on 


microdrives 
* Fully compatible with Psion packages, SuperBasic etc. 
MIRACLE SYSTEMS LTD Please send CWO. 
AVONDALE WORKSHOPS (UK ORDERS - prices include 
WOODLAND WAY V.A.T. & Carriage). 
KINGSWOOD (OVERSEAS ORDERS - prices 
BRISTOL include Carriage) 
BS15 1Q0L Send SAE for catalogue. 
Tel: (0272) 603871 Ext 210 

SINCLAIR and QL are trade 


marks of Sinclair Research Ltd 


STOCKS LAST 
RRP £299 


12” high resolution colour monitor 
complete with QL cable and 12 month warranty 


ASTRACOM. 1000 Modem £198 


Auto answer/dial modem with QL software. 
300, 1200, 1200/75, 75/1200. Call for data sheet. 


‘57 REPTON DRIVE 


NRQMPWAAZ) ces cn iss 


(0270) 582301 


PRICES INCLUDE VAT AND DELIVERY 
EXPORT ORDERS WELCOME: WRITE FOR TERMS 
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CODE IN THE 


a 


month’s on machine code and as- 
semblers, we look at what is required 
of a good monitor and compare the 
facilities provided by the various com- 


James Lucy concludes 
our Machine Code mini- 
series with a-look at the 
available monitors. 


There is obviously no point in using a 
monitor unless you have at least a pas- 
sing acquaintance with assembly 
language programming; — working 
through last month’s article will provide 
a basic grounding. 

The first problem is to decide exactly 
what constitutes a monitor. Like most 
terms in the computing world the defin- 
ition is not exactly set in concrete but, 
at the minimum, a monitor is a program 
which allows the user to scrutinise the 
operation of another program in as 
much detail as desired, if necessary in- 
struction by instruction. 

Since the user may not be the author 
of the monitored program and may not 
be in possession of the source code, it 
is useful if the monitor can convert the 
unintelligible numbers constituting the 


he 68008 microprocessor’ 
used in the QL is a great 
attraction for the machine 
code writer; among its 
advantages are its many re- 
gisters and a particularly rich instruction 
set. Those advantages nevertheless 
can expose all the more pitfalls for the 
unwary and it is easy to overlook the Tull 
action of one of the more complicated 
instructions or to lose track of the con- 
tents of a register. When that happens, 
or for other purposes like spying on the 
working of someone else’s machine ! 
code program, it is time to reach for the ~ 
monitor. 
In this article, which follows from last 


Mon QL is supplied as part of DevpacQL. 


Supermonitor from Digital Precision. 
Inexpensive, but no comparison. 
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mercial offerings to this requirement. . 


machine code program into assembly 


- language statements which can be 


understood by people — that is, it should 
operate as a disassembler. 

If the monitor is to correct or modify 
a program, a one-line assembler or the 
ability to modify memory locations 
directly will be required and in that guise 
the monitor will be operating as a de- 
bugger. Ideally, then, the product you 
buy should be a monitor, disassembler 
and _ single-line assembler rolled into 
one. As can be seen from the table, 
some products fall short of that ideal. 
Two unusual and useful variations are 
complete machine code development 
packages, where an assembler and 
editor is included in the monitor, and 
the packaging of the monitor as a plug- 
in ROM. © 


The monitors tested have many 
facilities and are, in the main, sophisti- 
cated programs. For that reason it is 
not possible in this article to describe 
every product in detail but each pro- 
gram has a personality beyond the bald 
facts in the table which, not surprisingly, 
will have a considerable bearing on how 
well you accustom to it. Accordingly a 
thumb-nail sketch will be attempted for 
each monitor. First, though, we look at 
some general considerations when 
monitoring programs which should 
make some of the table headings 
clearer. 

A general problem with monitors is 
their location in memory. If a monitor is 
‘EXECed’ from Basic it will be loaded 
as a job and, while it may well multi-task 
with the SuperBasic interpreter, its pre- 
sence will prevent resident procedure 
space being allocated, as may be 
required fora machine code SuperBasic 
extension. 


The Microdrive version of MonQL can 
be loaded into resident procedure or 
heap space. Qmon is not EXECed 
either, and the other monitors at least 
have facilities for reserving heap space 
from within them. Even more important 
than location is size; if you are trying to 
monitor a reasonably big program on an 
unexpanded machine it could be frus- 
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trating to find that the monitor will not 
fit. The table shows the size of the pro- 
grams; it is interesting to note that Qmon 
includes a cut-down version without the 
assembler facilities which is about half 
the normal size. 

An interesting difficulty arises when 
trying to monitor programs which use 
the screen a good deal; since the 
monitor will also be displaying its output 
on the screen there will be trouble. The 
Digital Precision monitor allows the win- 
dow used to be re-defined before the 
start of a session, the display for MonQL 
and Assembler Workbench may be re- 
sized during monitoring, and Qmon 
supports transient windows. 

That means that the area of screen 
which will be over-written by the monitor 
is saved to the heap, whence it is re- 
stored when the monitored program 
continues. In the meantime, the monitor 
can display the desired information. 

The fundamental function of a monitor 
is to trace the operation of a program. 
That can be done by setting the trace 
bit in the 68008 status register, or by 
other means, but in any case a simple 
trace is inadequate on its own. You may 
wish to trace a few instructions, run the 
program at normal speed until a certain 
point, then run the program slowly until 
a particular condition is met. 

_ When that happens, you might want 
to execute an arbitrary mix of monitor 
instructions. You will probably wish to 
disable the trace during calls to Qdos, 
in long loops within the program and 


QMon 


(QJump) 


PRICE 
£20 


perhaps during calls to subroutines, but 
you would like to retain the option. The 
program which probably best satisfies 
those requirements is Qmon, although 
all the others except the DP monitor will 
do something similar. 

A feature exceptional to Qmon, 
though, is the ability to back-trace, which 
is extremely useful if you over-shoot 
your intended stopping-place during 
tracing. The back-trace is somewhat il- 
lusory, as it seems to involve decre- 
menting the program counter and re- 
storing register values from a buffer; it 
is useful, nevertheless, and you did not 
expect reverse gear on a 68008, did 
you? 


An important area, in which the pro- 
grams differ considerably, is memory 
searches. The DP monitor distinguishes 
itself by having no search at all; Com- 
puter One and Assembler Workbench 
can search for strings and numbers but 
Qmon and MonQL can also search for 
instructions in whole or part, e.g., 
‘Moveq #0,’. Searches are useful for all 
kinds of things; you might want to 
change all occurrences of ‘mdv’ to ‘fip’, 
for example, or you may wish to look 
for the instructions which read the 
magic number from a cartridge. 

Finally in our round-up of monitor fea- 
tures there is the question of line as- 
semblers. Suppose that, in the course 
of debugging a program, you discover 
a slight error in an instruction. With most 


MonQ@L 
(HiSoft) 


Assembler 
Workbench 
(Talent) 


£20 Cartridge 


£30 ROM £25 


monitors you can patch the machine 
code by poking-in the corrected value 
but that assumes you can work out the 
opcode. If not, you are compelled to 
return to your editor and assembler to 
correct the error. 

A monitor with a line assembler solves 
the problem, because you can type-in 
the assembly language instruction and 
have it converted to machine code and 
placed in memory automatically. The 
only products with that very useful fea- 
ture are Qmon and Assembler Work- 
bench. 

There are other features which are 
useful or essential, such as disassem- 
bly, in which there is not much to choose 
between the programs; copying sections 
of memory, a feature Qmon strangely 
lacks, help screens, pseudo-registers, 
job control and so on. Good documen- 
tation is vital with products of this kind, 
preferably with many worked examples; 
without proper documentation even an 
excellent product can appear poor and 
the purchaser will never appreciate the 
full power of what he owns. Where ap- 
propriate, all those points are discussed 
in the notes on each program. 


This is an enhanced version of QL 
monitor, as supplied by Sinclair, both 
programs being written by Tony Tebby. 
The enhancements include some of the 
most pleasant features of the program, 
like back-tracing, macros and search 
for assembly language instructions. 


Monitor 
(Computer One) 


QL Super Monitor 
(Digital Precision) 


£25 £19 


SIZE (KBytes) 11 (Qmon 5) 14K (Cartridge) 20 18 9 


DISASSEMBLY Yes 
MEMORY CONTENTS DISPLAY 


MEMORY EDITOR 


Numbers 
Strings 
Instructions 


MEMORY SEARCH 


HEX andASCll 


Yes, simple 


Yes Yes, includes 


ASCII Dump 


HEX and ASCll HEX andASCll 
Yes, simple 
ASCII Entry 


Numbers 
Strings 


Numbers 
Strings 
Instructions 


Full editor, HEX or 


Yes, withoptions Yes 


HEX or ASCII 
options 


No, Modify 
Individual Locations 


Yes, 256 Bytes only 
Yes, simple 


Numbers 
Strings 
Wild Cards 


No 


COMPARE MEMORY BLOCKS No No No Yes No 
MOVE MEMORY BLOCKS No Yes Yes Yes No 
TRACE (SINGLE STEP) Yes Yes Yes Yes, manyoptions Yes 


Breakpoints in RAM/ROM Both 


RAM only Both 


Both (watchpoints RAM only 
inROM) 


TRACE UNTIL CONDITION Yes No No Yes No 
SET & DISPLAY REGISTERS Yes Yes Yes Yes Yes 
PSEUDO-REGISTERS No No No Yes No 


MACROS/CLONES 
USER-DEFINED KEYS 


ALTERABLE SCREEN DISPLAY 


ON-LINE HELP 
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Macros executed 
automatically 


No, but transient 
windows 


eparate File 
No 


JOB CONTROL Ss Yes Yes Yes No 
No 


Definable 

function keys 
Yes, limited 

for graphics 


Good Excellent 


Yes, and Dual Screens Yes 


Clone Individual 
Commands 


Yes, not within 
monitor 


Brief 
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The macro feature allows a number 
of monitor commands to be executed 
automatically after each trace step, ata 
breakpoint or as required. All com- 
mands are defaulted intelligently, which 
means that operation soon becomes 
natural and easy. The single-line assem- 
bler is an excellent feature. 

A curious omission is the ability: to 
move portions of memory, which can 
be useful if you want to make room for 
extra instructions in a program. The 
documentation is good, except that the. 
examples are a little simple and do not 
demonstrate many of the facilities. 
Highly-recommended. 


One of the best features of the Com- 
puter One offering is the documenta- 
tion. It needs to be good because, apart 
from the fact that there is no single-line 
assembler, it is a very comprehensive 
product. One of the most interesting 
features is the capability to clone 
monitor commands into daughter jobs 
which run independently. It is thus very 
easy to watch an area of memory, for 
instance. 

The monitor has a rather academic 
and rigorous air about it and | found it 
needed a good deal of thought to oper- 
ate. ‘Junk at end of line’ is a rather inde- 
licate way of describing one’s errors. 

The monitor is optimised for tracing 
jobs, rather than SuperBasic exten- 
sions; the latter requires some thought. 
It is not possible to search for 
instructions but the monitor is excep- 
tional in its provision of pseudo-registers 
and a compare facility which will high- 
light the point at which two blocks of 
memory first differ. Recommended if 
you are prepared to put in the mental 
effort. 
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MonQL is supplied on Microdrive as 
part of DevpacQL or on a ROM in its 
own right. The variants are functionally 
the same, except that the ROM uses 
very little memory and is available for 
use immediately. All the commands 
work neatly but once again there is a 
lack of a single-line assembler. 

There is, however, an intelligent copy 
which can move a block of memory into 
an overlapping area and a very neat 
system of listing Qdos traps; whenever 
you request a list of trap routines the 
monitor senses the contents of register 
DO and places an asterisk against the 
appropriate routine in the list. 

The monitor window can be re-sized 
at any time but the layout of the display 
is a little confusing and cannot be con- 
trolled to any great extent. | found the 
choice of command names to be rather 
‘un-nmemonic’ and _ difficult to 
remember, although that is personal. 
The documentation is reasonably good, 
with some helpful examples. The 
monitor. is satisfactory, especially in 
ROM but | prefer some of the others. 


Granted this is reasonably inexpen- 
sive but it does not stand comparison 
with the other products. For documen- 
tation you choose between a micros- 
copic print-out or a Quill document on 
the cartridge. There is no search, no line 
assembler and weak trace and break- 
point faciities. 

In favour of the program, there is a 
useful file-sizing utility and any-base 
number conversion, and a back-up car- 
tridge is provided. Perhaps the worst 


thing about the program is the descrip- 
tion that it is state-of-the-art, top-flight, 
feature packed and amazing. It seems 
strange that it is from the same software 
house as Simon Goodwin's excellent 
SuperBasic compiler. 


There are only two shortcomings in 
this excellent program. The first is the 
documentation, which is on cartridge 
as an ASCII file, readable from within 
the monitor or by the supplied editor 
and lacking any tutorial, and the second 
is the relatively minor lack of a search 
for instruction facility. 

Apart from that, the program is first- 
rate — sensibly-defaulted, helpful with 
errors and with all kinds of on-line help 
available. Dual screens for debugging 
graphics programs are possible; the 
function keys may be user-defined, 
commands may be taken from a file 
rather than the keyboard, and a small 
memory editor is provided. 

The monitor gives Qmon a very close 
run for its money and includes a good 
assembler and excellent editor to boot. 
itis a pity talent has seen fit to copy-pro- 
tect, unlike any of the others, because 
that makes life more difficult for the 
genuine users and boosts sales of un- 
locking programs. 


If you do not already have an assem- 
bler, the Assembler Workbench is the 
best choice. If you do, you might prefer 
the style of Qmon marginally. If you like 
your monitor in ROM, MonQL is an 
acceptable program. The Computer 
One offering is very sound and has that 
powerful cloning command but QL 
Super Monitor from Digital Precision 
leaves a great deal to be desired. 
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eg5>8 PROFESSIONAL ASTROLOGER 


By Elmar Duensser 


An amazing new Astrology System, for both beginners and experts. It comes with a large and fully comprehensive A4 manual —no knowledge of 
astrology at all is required. This package will allow you to not only obtain an extremely detailed personality/character delineation (typically 6-9 
pages of single-spaced A4 text!!), but also to get individualised text interpretations for predicting ahead, both on a year-to-year and on a day-to-day 
basis. The entire system occupies 4 microcartridges with 300K of text data — diskette users get even larger files. And the system does 
synastry/compatability testing too, with automatic text readout! We've thought of everything this time! 

“The most powerful & complete astrology package on any micro.... provides everything that a present day Nostradamus will need... the ultimate 
astrology package.... a 5-Star (+++) program — a Sinclair User Classic (the highest award given to any program)” SINCLAIR USER 


x An Asitonomer module is available to users of Professional Astrologer. £7 if ordered with Prof. Astrologer, £10 if ordered later. The module has: Moon/Venus/Mars faces, 
declinations, eclipses (exact display), actual Planetarium view for any time, date & location. Choice of 5 coordinate systems. Solar system display 
with zoom, autoincrement, variable position, etc. 


Super Astrologer Professional 
Features de luxe Astrologer 


Automatic House Calculation * * 

Text files for House Interpretation 31K 7OK+ 
Automatic Sign Calculation * * 

Text files for Sign Interpretation 37K 80K+ 
Automatic Aspects Calculation * * 

Text files for Aspects Interpretation 30K 70K+ 
Graphic print of Natal Chart Not proportional Proportional 
Interpretation uses ASC + M.C. = * 
Calculation Accuracy this century Within 5 mins. Within 1 min. 
User Definable Astrological Character Set 


User-Modified Interpretation files with 
AND/OR logic — full screen editor 


User Definable Printer Driver 
Output to Screen/Printer/Microdrive/Disk 
Automatic Progression Calculation 


Text output for Eeogression Interpretation 
allowing Year to Year horoscopes 


Automatic Compatibility Calculation 


Text output for Compatibility Testing allowing 
automatic comparisons between individuals 


Automatic Transits Calculation 


Text output for Transits Interpretation 
allowing Day to Day horoscopes 


User-Definable House System * (6 defaults) 
User-Definable Aspect Orbs = * 

Text & Defaults Editor programs SuperBASIC Micode 
“NOT” facility in Interpretations = 


Selective “ANYTHING” facility (eg; 
anything in Third House Biquintile = 
anything in Aries) in Interpretations 
Batch printing/processing 
Narrowing/widening/Stationary Aspect indicator = 
Sample Birth data files 20 
Birth data file compression - 


SINCLAIR USER CLASSIC 
sxxxx £49.95 
NEW pOr AA MANUAL 
LARGE A4 MANUAL 


THE DEFINITIVE QL GRAPHICS PACKAGE 
By Charles Southey 


We would love to tell you all about this superb system — but space is short. Take it from us, we've looked at every single graphics & CAD program available on the OL 
(£49.95 systems included!) and combined their best features with our own ideas. The result ... EYE-O (yes, it is intelligent). Design your own full colour screens with 
complete ease — ALL the features are here. Fully driven by pop-up menus * single key entry * several zooms * windowing * proportional movement x paint/fill x 
rubber bands * arcs * ellipses * circles * lines x files * replicable sprites * horizontal & vertical stretch * reflect * invert * transfer * pan/scroll * undo (ie; whoops!) * 
font design editor * automatic anti-aliasing * graphic screen compression offset display * on-screen help * XOR/OR cursor with variable width * paste * recolour * 
magnify * reduce * text inclusion * freehand movement localised save/load/scroll/pan/recolour/zoom x integral sprite editor * full range of QDOS colours & stipples 
available through paintbox * user-definable defaults . . . If you already have a graphic system, throw it out. Eye-Q is in a class by itself, a state-of-the-art program from the 
~people who brought you Sprite Generator & SUPERCHARGE. The system is supplied complete with a fully comprehensive A4 manual. Fully compatible with 
SUPERCHARGE, joysticks, mice &, of course, Sprite Generator. 


£24.95 COMPLETE WITH EXTENSIVE DOCUMENTATION 


Features : QDRAW/GRAPHIQL EYEQ Features QDRAW/GRAPHIOL 
‘Freehand’ cursor drawing x: Full screen reflection 

8-directional movement ad Full screen inversion 

Variable-width cursor zai Full screen stretches 

On-screen text inclusion tl Full screen recolour 

8 Character sizes bak Full screen scrolling/panning 


All QDOS colours available Only solid colours Full range of under cursor-key control with 
colours & stipples wrap-round OR edge deletion 


Paintbox colour selection = * Local area transfer 

Fully menu-driven = * with reversal 

Zoom-in X4 & X16 * x with inversion 

Fill facilities Only solid colour fill Any colour fill with stretching (hor, or vert.) 
Rubber banded lines Localised scrolling/panning as above 
Rubber banded arcs Localised recolour 

Rubber banded circles Localised/Full screen size reduction 
Rubber banded ellipses Access to HI/LO resolution within program 
Rubber banded boxes Integral character editor 

Full file operations Screen Compression 

Localised area load/save Monochrome Save 


is} 
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100% flicker-free- 
collision-detection, tally vari 
__ preprogrammed sprite library), Controlled sp 
; ; atible with SUPERCHARGE. 
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By Colin Opie 
An essential program for anyone who uses microcartridges and/or disks to store things of value! No more need you fear for the safety of your programs & data. Super Media 
Manager provides a host of device management tools in one integrated, fully menu-driven unit — an unbelievable 350K of programs! 
* Selective directory, copying, and erasing of files * Direct file copying from other disk formats (PC-DOS, MS-DOS, CP/M, Acorn DFS etc, 
%* Sector loading and viewing (cursor controlled) etc) — sector copying to other disk formats. 
* Sector editing — Hex. and ASCII input allowed * Text file translation utility 
Automatic reports when mapping sectors — expands tabs, converts CR/LF to LF intelligently: converted files may be 
* Sector copying to sector, file, device etc. Imported to Quill. 
* Viewing, printing, or saving of drive map details * Disk sector editing for both OL & non-QL disks, with all the usual features 
* Automatic (semi-auto on disks) recovery of deleted files * Full error reporting with automatic recovery 
* Bulk recovery of corrupt files to new files * Hexadecimal calculator 
%* Header block or Disk type information display * System configuration 
* String searching by sector or file — ultrafast * Full directory sort facility, by name/size/type/date etc 


*Control upte 256 cartridges/disks - DIRECTORY of DIRECTORIES 


Talent Talent a 
Features Cartridge Dector Media 2 anager Features Cartridge Dector Media Manager 
Automatic file recovery Sector copying 
Intelligent directory handling Header block reporting 
Sector editing Drive map reporting 
File block salvage String searching (3 types) 
Transliteration by character Formatted print utility 
Transliteration by string Selective directory/copy/delete 
Text file format translation Intelligent directory sorting (multiple criteria) 
Sector viewing Printer echo facility 
PLUS ALL THE DISK FEATURES (Cartridge Doctor has none!) 


Super Media Manager is supplied complete with an 80+ page A4 User Manual. 
£39.95 comprere £19.95 FOR A CARTRIDGE-ONLY VERSION 


NEW SUPER MEDIA MANAGER 


VL PL) oe] oe] oe | oe | ot 


: Get/Jump/Registers commands, with single key entry. 
: £18.95 COMPLETE or £16.95 i ordered with SUPERCHARGE or Media Manager 


* SUMMER BONUS - You may deduct £2 from the total price if you buy any 2 programs, £4 if your buy any 3 programs, £6 if you buy any 4 programs and so on. (These offers do not 
apply to upgrades). 

* Orders from abroad are welcome. Please add £1 (£2.50 for programs over £25) per program for orders from Europe and £1.50 (£4 for programs over £25) per program for orders from 
other countries, to cover airmail postage and packaging costs. Cheques from abroad should either be drawn on a UK bank or be Eurocheques — if you are unable to obtain either of 


these add £5 to your order price to cover cheque clearing charges. 
* Ifyou have an early version of one of our programs, send the microcartridge(s) (not the packaging) to us accompanied by £5 (£10 if SUPER ASTROLOGER or over £25). 


os All our software is 100% compatible with all memory expansion & disk systems. 
* Programmer & dealer enquiries are welcome. Demonstrations of all our programs are available at Micro Anvika, 220A Tottenham ate Road, London. 


* RP oC HBRGE TICES is available for £79.95 — or £89.95 with CHOice too! Special prices on all EIDERSOFT programs — just phone u: 
* All our Software is compatible with the THOR & QLT machines — we guarantee to support the QL & QL compatible market through 1986. & 1987 at the very least. 
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Plesecudime a 
- Address: 


Name: _ 
-  Poitode 
Acces Mastercard | a Visa/Barclaycard 
_ a date . 
"Sigman: 


Please indicate if) you have: ays" dG Jo SV" disks: If sO, do you get On 720 sectors ar 1440 sectors ? 
“THE ONLY SOFTWARE. HOUSE DEDICATING wes ITS RESOURCES he THE Oi 


the diary is almost un 


Mop a diary has becom 
a very important aspect 


organising our lives and 


~ activities into something _ 
resembling logical © 
_ progression and order. That 
popularity of the cor 


diversity of diary types 
available for almost any — 
: particular applicatis ae 


i Veronica Colin at Talent. 


Ul Ker: Brourning at Eidersoft. 


ham Smith at Datatanagement, 


Freddy Uachha at Gigital Precis 


QL Bay Engagements in eats of PAPO : 


available for home and 
business use. : 
The two similar utilities : 
reviewed offer slightly 
different features and cater, 
in common with their 
book-like counterparts, for 
individual preferences. One 
advantage of using electronic 
diaries is that it is possible 
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format, and altering them for 
_ either previous or suceeding 


months. Asub-menu on that 
page includes prompts for 
altering the calendar display. 
You are also offered the 
option of entering particular 
dates into the display 
command which could 
otherwise take too long to 


_ is run. When the alar - 
_ sounded, the message to 
~ which it relates is shown . 
_On- Screen. 


ues iad Business . 
Organiser 
Gemini Marketing 


£14.95 


Taking a slightly different 
approach to information 
organisation, L.B.O. includes 
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a of the defined categories, 
Other differences ate 


~ information is baled for 
_ each date and category.Four 

options are available for 
_ each entry | made anc ae 


Sl or to a printer. 


searches for information 


may be made by text or date. 
_ Two pages have been 


included which show either 


a week- -planner or a month: 
planner in a bar a 


display. 


Overall, there is little to - 
choose between either 
utility. They are both 


excellent programs in that 
they supply an efficient 
means of organising 
important engagements in 
the most efficient manner. 


Of special i interest to users . 
of the system, automatic — 


initiate file-loading © 
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procedures with the — Sub-opti 


28 beginners and seasoned 
‘programmers. 


positioning fine detail in a 
drawing. Work proceding in 


oo 


Information 
Data Management, Clark House, The Village, Haxby, York 
YO3 8HU. Tel: 0904 760847 
Gemini Marketing Ltd, Gemini House, Concorde Road, 
Exmouth, Devon EX8 4RS. Tel: 0395 265165 
Pyramide, c/o Rio Promotions Ltd, 28 Waverley Grove, 
London N3 NPX. Tel: 01-349 2764 
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PRO PASCAL & 
PRO FORTRAN-77: 


FOR SINCLAIR QL: £99.95 incl VAT 


USE THE LANGUAGES THE 
PROFESSIONALS USE: PASCAL AND 
FORTRAN. 

C is high on performance but low on safety, 
structure, portability and maintainability. 
Pascal is excellent for education and for long- 
term projects. Fortran gives you access to 
hundreds of existing programs — and uses 
established programming skills! 


ISO-PASCAL 

Pro Pascal is validated to ISO 7185 / ANSI 
770X3.97 Class A (no errors) on the Z80 
processor under CP/M and the 8088 
processor under PC-DOS. This provides a 
guarantee that the compiler is complete and 
works perfectly. 


FORTRAN-77 

Pro Fortran-77 is a full implementation of 
ANSI Fortran—77 with no omissions and 
many useful extensions. Validation is 
imminent. 


Prospero Compilers Work! 
No known bugs when we ship - so you don’t 
have to program around the holes. 


“Lazy I/O” for interactive use. 


Good Housekeeping 
All files closed on exit from procedure. 


Hand-coded library 
Produces compact and efficient programs. 


Ideal for 

° software developers 

* universities and colleges 

* government and industry 

¢ students of computing 

¢ development of personal skills 
* solving technical problems 

* training institutions 


Prospero 


Prospero compilers: 
portable source code 


16 digit accuracy 
Single and double precision IEEE format 
arithmetic gives 7 or 16 digit precision. 


50,000 Lines Big 

Compiles big programs >50,000 lines... 
>5,000 identifiers...Separate compilation to 
build libraries and massive program suites. 


Compilers include 

¢ compiler 

e linker 

¢ run-time libraries 

e librarian 

X-ref program 
sample programs 
200+ page manual 
graphic subroutines 


Pascal «—» Fortran 
Interlinkable code means you can use the best 
of both languages. Ask for details. 


We Specialise 

At Prospero we specialise in writing language 
compilers. We produce the best possible 
compilers, conforming to the appropriate 
standard, and giving programmers a secure 
base on which to build. 


Quote: “Pro Pascal is not only ISO- 
validated, it is also a superb-quality and very 
full software development tool.” Personal 
Computer World Nov 1985 


Prospero compilers are used at more than 
6000 sites around the world. 


Software 


y, LANGUAGES FOR MICROCOMPUTER PROFESSIONALS 


It’s easy to order! 
Credit card holders phone 01-741-8531. 
Mastercard, Visa, Diners & Amex accepted. 


. Prospero's compilers are also available from 


good software dealers and-distributors 
worldwide. 


Reviews & Info 
Call 01-741 8531 or write in for a free info 
pack with datasheets and magazine reviews. 


4. 


New: Pro Fortran-77 for MS-DOS will be 
available in August/September 86. 


Software distributors 
Contact us for our Worldwide Distribution 
Guide. 


| Mail order service 


| 
Send this coupon with cheque to Prospero | 
Software Ltd, 190 Castelnau, London SW13 | 
9DH, England. Add 15% VAT in UK or £5 
shipping outside UK. Allow 28 days for | 
delivery. | 
Please supply (enter number required): | 
____ Pro Fortran-77 for Sinclair QL at £86.91 
_____ Pro Pascal for Sinclair QL at £86.91. | 
Also available: | 
_____ Pro Fortran-77 for Atari ST at £129. | 
____ Pro Pascal for Atari ST at £129. 
Pro Fortran-77 for MS-DOS at £420. | 
____ Pro Pascal for MS-DOS at £320. | 
____ Pro Pascal for CP/M-86 at £320. l 
Special offer till 1/10/86: both QL compilers 
for £162. | 
I enclose payment of £ ; | 
| 
| 
| 
| 


Telephone NOv<.cites-0sssecere sooserreee sans <oaowaee 

In case of query call 01-741 8531 or telex 

8814396. Tick product name if you just require 
information! QLW 9/86 | 


Our QL expert 
Colin Opie finds 
the answers to 
your technical 


Technical Helpline 
Sinclair QL World 
79-80 Petty France 
London SW1H 9ED 


It is perhaps a little 
unfortunate that the 
program used the keyword 
‘FOP_IN’ as that is a toolkit 
extension to SuperBasic. If 
you have no toolkit of any 
kind you clearly will not be 
able to use the function. 

There are a number of 
ways we can circumvent the 
problem and we shall 
explore a few of these 
avenues. The use of the 
keyword ‘OPEN_IN’ I 
suspect was inappropriate 
and therefore it appeared 
not to work. Before going on 
to obtain a solution to the 
query, let us first make sure 
we know that ‘FOP_IN’ and 
‘OPEN_IN’ are and what 
exactly it is they do. - 

The SuperBasic extension 
‘FOP_IN is a function which 
will return an integer value 
representing an error 
condition. As we all know, 
SuperBasic has no real 
error-trapping facilities and 
so if you try to open a file 
for input, and the file does 
not exist, your program will 
halt abruptly. It would be 
better if some mechanism 
existed which would enable 
us to look for a file and tell 
us, under program control, 
whether the file existed or 
not. That is what ‘FOP_IN’ 
does. In Charles Dillon’s 
program, line 27 contains 
the statement: 


LET wrong = FOP_IN 
(#5,ipfil$) 


The string variable ‘ipfil$? 
contains the name of the file 
you want to read. If the file 
exists, ‘FOP_IN’ will perform 
an implicitly ‘OPEN_ 
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problems. Write to: 


Having recently lost some 
Archive files, painstakingly 
we listed the program 
printed in the January/ 
February edition of OL User. 
When we ran the program it 
came to a halt in two places 

— lines 27 and 372. Those 
two lines have the common 
keyword “FOP_IN”. 

Our version of the QL 


IN#5,ipfil$’ procedure call 

and return the value zero — 
signifying no error — to the 
variable ‘wrong’. 

If the file does not exist, 
no attempt will be made to 
open channel five and a 
(negative) error number 
will be assigned to the 
variable ‘wrong’. The effect 
then is to obtain a sensible 
check, under program 
control, for the existence of 
a particular file. 

Replacing the function 
name ‘FOP_IN with the 
procedure name ‘OPEN_IN’ 
clearly will not work. Why? 
Because ‘FOP_IN’ is a 
function which will return a 
numeric result. As such it 
must exist within an 
expression. ‘OPEN_IN’ is a 
procedure which attempts 
to opena channel to allowa 
specified file to be read. it 
does not return a value, it 
cannot be used in an 
expression, and it must form 
the basis of a SuperBasic 
statement in its own right. It 
is important that we 
understand the difference 
between a function and a 
procedure call. For example: 
These are incorrect: 

30 x = OPEN_IN#5,fyle$ 
30 FOP_IN (#5,fyle$) 


Archive on the mend 


seems to recognise “FOP_ 
IN” as a keyword but does 
not know what to do with it. 
We have many toolkits and 
we have tried using 
“OPEN_in” but that does not 
seem to have the desired 
effect. 


A.B. James 
Newport Pagnell. 


These are correct: 
30 OPEN_IN#5, fyle$ 
30 x = FOP_IN (45,fyle$) 


When deciding whether 
or not a keyword is 
recognised, a further point 
must be noted. We know that 
SuperBasic always lists 
known keywords in 
upper-case letters. If you 
type-in a listed SuperBasic 
program exactly as it is, 
SuperBasic will not convert 
keywords, typed in upper- 
case, to lower-case if it does 
not recognise the keyword. 
As such you could be fooled 
into thinking that your 
machine recognises the 
keyword, when in fact it 
does not. The best way to 
type-in listed SuperBasic 
programs is always to use 
lower-case and let 
SuperBasic convert that 
which it knows about to 
upper-case. 


So much for that. Now let 
us consider some solutions 
to the problem. The simplest 
solution, of course, is to 
replace the ‘FOP_IN’ 
function call with an 
‘OPEN_IN’ procedure call 
and hope that the file exists. 
That would imply that we 
can do no checking and 


therefore the two parts of 


Dillon’s program would 
have to be converted as 
follows: 

27 OPEN_IN#5, ipfil$ 
28 EXIT if loop 

and 


| 372 OPEN_IN#7,yné: 


wrong=0 : file_ip=1 

That is all very well but we 
have now returned to 
standard SuperBasic which 
will stop with a fatal error at 
every conceivable 
opportunity. Assuming we 
have no toolkit, we could 
implement our own 
‘FOP_IN’ function. That still 
has limitations, however, 
because we cannot use it to 
check ifa file which we wish 
to open for writing already 
exists. There are other 
checks we may like to 
perform as well, for example 
whether or not the disc or 
cartridge is write-protected. 

The program in figure 
one will provide a 
SuperBasic extension which 
fulfils all our needs in this 
respect. Type-in the 
program and save it on a 
cartridge or disc. Whenever 
you run the program the 
function ‘DEVSTAT’ will be 
added to SuperBasic. Clearly 
you need to run the program 
only once each time the QL 
is switched on or re-set. The 
function expects a single 
string argument, as follows: 
30 status=DEVSTAT(devfile$) 


The string variable ‘devfile$’ 
will contain the file name for 
which you wish to check — 


e.g., mdvl_prog1, mdv2_ 
demo, and so on. DEVSTAT 


will return a numeric result 
having the following range 
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Slave QL 


The low cost of the QLs now 
on sale prompts me to 
consider buying one as a 
back-up for my present QL. 
Rather than having a spare 
QL sitting idly by, awaiting a 
_catastrophic failure of my 
main machine, I wondered 
if it would be possible to set 
it up as a printer driver/filer? 
I envisage an arrangement 
where I can send files to be 
printed or SAVED on aslave 


ofvalues and interpretations: 
0 (or +ve) : Name given is 
legal, and file does not yet 
exist. 
-3 or -6 f Out of memory. 
-7 : Cartridge or disc is not 
in drive, or the device name 
is unknown. 
-8 : Name given is legal, and 
file does not exist. 
-9 : Device is in use, and 
cannot be acessed yet. 
-20 : Cartridge or disc is 
write-protected, i.e., in 
read-only mode. 

This is of great benefit to 
us. Using this function 


Figure 1. Devstat loader. 


QL, allowing uninterrupted 
use of the master QL. Most 
of my time is spent using 
Archive, Quill and Abacus, 
so I would like to be able to 
use such a facility from those 
packages. 

Would the much-derived 
network cable be of any use 
in such an application? 


Alan Jarvis 
Beaconsfield, Bucks. 


28 <delete this line> 

and 

372 file_ip=1: IF DEVSTAT 
(yn$)=-8: OPEN_IN#5,yn$: 
wrong= 
0:ELSE:wrong=-7:END IF 


Note that DEVSTAT 
cannot perform an implicit 
OPEN_IN like the FOP_IN 
toolkit extension because it. 
does not know whether you 
are checking for an input 
file, an output file, or just a 
valid device name - e.g., 
and so on. 

There is no doubt that the 


DATA 67,250,0,12,52,120,1,16, 78,146 


102,4,83,67,103,4,112,241, 78,117 


114,255,112,1, 78,66, 34, 70,211,196 


100 REMark DEVSTAT. Loader 

110 REMark (c) C.Opie 1986 

120 . 

130 base=RESPR(120) 

140 FOR m=0 TO 113 

150 READ x:POKE basetm,x 

160 END FOR o 

170 CALL base 

180 STOP 

190 : 

200 

210 DATA 112,0,78,117,0,0,0,0,0,1 

220 DATA 0,12,7,68,69,86,83,84,65,84 
230 DATA 0,0,52,120,1,22, 78,146, 74,128 
240 DATA 

250 DATA 65,246,152,0,46,8,44,9,66, 132 
260 DATA 56,16,86,68,2,4,0,254,118,2 
270 DATA 

280 DATA 44,9,58,0,102,10,112,2, 78,66 
290 DATA 32,71,112,4,78,66,34, 70,85, 73 
300 DATA 61,133,152,0,120,3,45,73,0,88 
310 DATA 112,0,78,117 : 


means that we can test for 
any file or device in any of 
our programs and keep 
control within the program. 
Returning again to Dillon’s 
now continue error- 
checking by re-writing the 
program with: 

27 IF DEVSTAT Cipfil$) =-8: 
OPEN_IN#5, ipfilf: 

EXIT ifloop 


use of DEVSTAT is preferred 
to removing error-checking 
from a program. Perhaps 
readers will be encouraged 
to use this extension in their 
programs so that toolkit 
owners and non-owners 
alike can share programs 
which cater for error- 
checking on files and 
devices. 


There is no reason why two 
or more QLs may not 
communicate via the 
network ports. Standard 
SuperBasic is a little limiting 
in the way it allows you to 
use those ports but 
proprietary extensions exist 
if you wish to improve this. 
When we talk ofa network 
we are referring to a group 
of QL machines coupled 
loosely using the network 
cables. Each QL on the 
network should have a 


‘distinct station number. 
‘When a QL is first switched- 

; on, or re-set, it assumes itself 
_automatically to be network 


station 1. The procedure 


. ‘NET n’ is used to assign a 
. different station number toa 
-QL. The value of ‘n’ should 
‘be between 1 and 63. 


If we had two QLs we 


‘could leave one alone and 

-set the other to, say, station 
_2.To communicate between 
_machines a network channel 
_needs to be opened on each 

.communicating QL. A 

- transmitting QL requires an 


output channel and a 


‘receiving QL requires an 
‘input channel. 


When the channel is 


‘opened it is possible to 
_specify the exact station to 
which the data is to be 


written to or read from. For 


.example, if we were using 
- stations 1 and 2 we could use 
‘station 2 as a printer buffer 
‘QL by using the followin: 
‘code: 


100 REMark NETwork spoo 
ler 

110 NET 2@:base = RESFR( 
50000) 

120 REFeat spooler 

130 i=base: OPEN#3,neti_ 
1 

140 REFeat loop 

150 b=CODE (INKEYS (#3, -1 
))<POKE i,bsi=1+1 

160 IF b=26:EXIT loop 
170 END REFeat loop 

180 CLOSE#3: i=base: OFEN 
#2,5er1 

190 REFeat loop 

200 b=FPEER(i):IF b=26:E 
XIT loop 

210 FRINT#3, CHRS (b) 5:i= 
itt 

220 END REFeat loop 

230 CLOSE#S 

240 END REFeat spooler 


The size of the spooler 
buffer is given by the RESPR 
statement. Ifthe transmitting 
station is not station 1, it 
would be simple to change 


the station reference in the 
NET_I statement in line 130. 
If we wanted to spoola file 
from transmitting station 1, 
we could enter the code: 
copy MDV1_myfile to neto_2 
open#3,neto_2:print#3, 
chr$(26);:close#3 


The first line sends the 
file. The second line sends 
the control code being used 
to tell the spooler we have 
finished. It is important that 
the spooler station is 
running the spooler 
program before we try to 
send anything to it. Itis also 
important to close the 
neto_2 channel to force all 
the data to be send. Data is 
normally sent across the 
network in 255-byte blocks. 
If we do not close the 
channel, the control code 
will not be sent. 


We can improve on that 
system by making it more 
general..Ifa receiving station 
opens a NETLn channel, 
where ‘n’ is the receiving 
station’s number — i.e., not 
the number of the 
transmitting station — the 
station will collect data 
satisfactorily from any 
transmitting station sending 
data to it but not to other 
receiving stations. 


You can also go into 
broadcasting mode. In that 
mode the transmitting 
station can broadcast data to 
more than one receiving 
station. To do that, open a 
channel using station 
number 0-the broadcasting 
station. You must not assign 
a QL to that station number; 
simply open a channel using 
NETO_O or NETLO as 
appropriate. 


That is the sum of the 
facilities afforded normally 
under SuperBasic. If you 
wish to have much-improved 
network handling I can 
recommend Tony Tebby’s 
Toolkit II, available from 
QJump or Care Electronics. 
That ROM, among 
hundreds of other things, 
provides enhanced network 
facilities including buffer 
size specifications, proper 
file-server operations — e.g., 
open a window on another 
QL screen — network hiding, 
I/O device sharing and 
messaging. 


PUZZLE PAGS 


twas raining, so 
did not really 
want to walk to 
he pub. I had 
fed the cat as 
many times as possible —and 
myself even more. The time 
definitely arrived to devise a 
puzzle page. I braced myself, 
then sat down resolutely to 
see what was on television. 


Eventually, I had to admit 
that I would not be able to 
think of some unusual idea 
for this month’s page. So, 
instead, I offer avery simple 
program to solve a very 
simple and well-known 
problem. It is shown in 
figure one. It is programmed 
very badly. Rather than using 
meaningful identifiers, I 
have used single letters. I 
found that rather confusing, 
too, and I have made a 
number of minor errors. 
Nothing serious, but the 
program does not work. 

What I would like you to 
do is decide where the 
errors are and put the 
answers on the entry form. 
In all cases the error can be 
corrected by substituting 
one indentifier for another. 
There are five mistakes in all. 

If I was feeling generous I 
could tell you what the 
program is designed to to. 
Unfortunately Iam not. One 
clue I will give is that 
PROCedure ‘g’ is the display 
procedure. You probably 
gathered that because of the 
PRINT statement. Anyway, I 
happen to know that 
procedure contains no 
errors. 

When filling-in the entry 
form, answers such as: 

Line 100. From a To b 

will suffice. In this case, you 
would be indicating that line 
100 should read: 

100b = 1 

This month’s solution 
should require no 
programming, other than 
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the one I have given you. 
Once you have worked out 
what the program is 
designed to do, I would be 
interested to see any other 
elegant solutions to the 
problem — the shorter the 
better. 


RULES 


All entries must be 
written on the panel 
provided on this page. 
Any other form of entry 
will be disqualified. 

Entries must be sent by 
post to: 

PUZZLE PAGE, 

Sinclair QL World, 
79-80 Petty France 
London SW1H 9ED 

to arrive no later than 
Monday September 15, 
1986. 

The winner will be the 
first Correct entry drawn 
from the editor’s hat. If 
nobody submits the 
correct alterations, the 
winner will be the person 
with the nearest answer. 

All entries will be 
judged by the Editor of 
Sinclair OL World. The 
editor’s decision is final 
and no correspondence 
will be entered into 
regarding the result. 
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| ENTRY FORM 
| Errors are: 


] 1. Line . From To 
I 2. Line . From To 
I 

] 3. Line . From To 
I 

| 4. Line . From To 
| 5; Line . From To 
I 

] Name: 

| Address: 


l 
I 
Ee ey. 


a + c THEN EXIT e 


END REPeat e 


DEFine PROCedure ?f 
d(ec) = d(c) +a 


g 
END DEFine f 


DEFine PROCedure ¢ 
FOR ¢ = a TO b 
PREND WOM 3 cis Usk Corgi yt" 
END FOR ¢ 
END DEFine ¢ 


DEFine PROCedure 
IF d(ec) = a + 
-: 
ELSE 
J 
END IF 
END DEFine h 
DEFine PROCedure 
d(ec) = - a 
e=ec-a 
END DEFine i 
DEFine PROCedure 
k 
IF 1 = a THEN 
END DEFine j 
DEFine PROCedure 
l1=1 


FOR m = 1 TO c¢ 


IF d(m) = 
Iv ie 3= "=m 
IF ec —- m= 
END FOR m 
END DEFine k 


SOLUTIONS 


The Doodle Puzzle did not 
seem to confuse many 
people. The solution can be 
built as a tree-like structure, 
as shown in figure 2. This is 
simulated in the program — 
figure 3 — by an array (pos$) 
and the pointers (pointer% ) 
which build a tree structure, 
as shown in figure 4. When 
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k 


=-b 


diCe)* THEN §1'= 10 
d(c) - d(m) THEN 1 
d(m) - d(e) THEN 1 


solving the problem, the 
program produces all the 
possible moves from the 
‘present’ position and each 
move is added to the tree, 
with a pointer to the next 
move generated. 

By working through this 
linked list of positions, the 
program ensures that all 
positions are generated in 
order. 

When generating those 
moves, the program must 
check to make sure that no 
position is duplicated. For 
instance, one of the moves 


SS ee 


RARER rer. 


This month our 
resident problem 
poser Marcus 
Jeffery challenges 


produced from the home 
position is “5124673” — using 
move ‘A’ complete 
clockwise. From that 


Figure 2. 


5124673 


ao 


6514732 1234567... 


position, move ‘B’ — 
complete anti-clockwise — 
will produce the result of 
“1234567”. Obviously, that 
must not be added to the 
table, as it already exists. 
Therefore whenever a new 


Figure 3. 


DIM poss(7992.7), pose vences(s22)) pointer%(7992),space%(333) 
: : count = 1 


true = -1 : fals = 0 
used ("1234567") 3 
present = j +1 


REPeat build_tree 
expand_tree 


you to correct the 
errors in a 
program listing. 


SE MOONEE 
: last_used = j 


SOLUTIONS 


algorithm. 

One fairly efficient 
hashing algorithm is to use 
the position as a seed for the 


1234567 


2374156... 


LAN 


1234567 3764215... 


QL RANDOMISE statement. 
If you have sufficient 
memory for an array of, say, 
18,000 to 20,000 elements, 
using the statements: 
RANDOMISE position 
table_entry = RND 


: AECDOUSIES DEP ROS 


IF count = 5040 THEN EXIT build_tree 
present = pointer%X(present ) 


END REPeat build_tree 
find_level ("6245173") 
find_worst_case 


REMark 
DEFine PROCedure expand_ 
FOR mov = 1 TO 6 


tree 


new_pos$ = aps (mov, poss (present) ) 


IF NOT used(new_| 


pos$) THE 


spaceX%(slot) = epacex (aloe) ce st 
pos$(j+1) = new_pos$ 
pointer%x(last_i use) =, +: ds 


last_used = 


1 
dietancex (last) used) = distancex(present) + 1 
count + 


count = 
END IF 
END FOR mov 
END DEFine expand_tree 
REMark 


DEFine FuNction map$ (x,x$) 
SE ON x 


Lect 


s 


position is generated, all the 
previously-generated 
positions must be checked 
to ensure that it does not 
appear twice. 

One way would be to 
check all the previously- 
generated positions — there 
can be a maximum of seven 
(= 5040) of these, so this 
could be slow. Another 
method is to use a hashing 


"5124673" 
"2370156" 
"4123567" 
"2341567" 
"1235674" 
"1237456" 


(1 TO 20000) 

you will have very few 
collisions. The smaller the 
table, the more collisions 
you can expect, and the 
longer the program will take 
to run. 

The method used in the 
program in figure three is to 
utilise the first three digits as 
a ‘slot’ number. Each slot 
must have room for all 
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Figure 4. 
1234567 


5124673 ——» 2374156. ...—» 1237456 


6514732 ——» 1234567 ———4512673.... 


Ets... 


combinations of the other 
four digits in the number. 
First, one is subtracted from 
each of the first digits and 
base seven is used to give a 
result. For the highest first 
digits —i.e., “765” —this gives 
the maximum slot equal to: 
(49 * (7-1)) + (6-1) + A * 
(5-1)) = 333 slots 

That is the value given to 
the size of the array ‘space%’ 
which keeps a note of the 
next empty location in each 


END DEFine map$ 

REMark 

DEFine FuNction use 
slot = 49*(x$(1 
i = 24 * slot: 
FOR k = i TO 


the ‘space%’ array to 47. 

That gives smaller arrays — 
redundancy = 11.9% — but 
there are now 120 entries in 
each slot. Line 530 should be 


changed to: 
530 slot = 7 *(x$(1)-1) + 
(x$(2)-1) - 1 


and the value in line 730 
should be altered to 5640. 
The number of moves 
required to reach the home 
position from “6245173” is 
five. The worst possible 


yS & x$(m$(i)) 


7*(x$(2)-1) + es =1) ="1 
+ spaceX(slot) — 


J 
IF x$ = pos$(k) THEN RETurn true 


END FOR k 

RETurn false 
END DEFine used 
REMark 


DEFine PROCedure find_ level(x$) 


PRINT 
IF used(x$) THEN 
PRINT 


to reach home." 
ELSE 
PRINT “Error. 
END IF 
END DEFine find_level 
REMark 
DEFine PROCedure find_wors 
PRINT 


Tree 


largest_distance = 0: 
FOR i = 2 TO 7992 
IF distance%(i) > 
largest_distan 
position$ = po 


NNN AAAAM oO 
oeoo000000000000 o 


con 
peauires Ciel 
END bEFine find_worst_ case 


enor 
row 
ooo 


slot. Each slot must have 
room for four (= 24) 
entries. That gives a total 
array size of: 
333 * 24 = 7992 entries 
and a redundancy of: 
100 * ((7992/5040)-1)=58.6% 
If you find you have 
insufficient memory for 
these arrays, change the 
main array values to 5640 
and the number of slots in 


x$:" requires ";:dietance%(k);" moves 


not fully expanded." 


t_case 
positions = 1234567" 
largest_distance THEN 
ce = distancex(1i) 
s$(i) 


positions 
tlargest_distance;" moves. 


starting position is “3214765” 
which requires 10 moves to 
reach the home position. 
There are no other positions 
which require so many. 

One person who 
suceeded is D. Bloomer of 
Neasden, London who is the 
winner this month and will 
receive a year’s free 
subscription. 
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In the second instalment 
of our Forth feature, 
Charles Gerrard explains 
the theory behind looping. 


efore moving to other 

constructs, after working in 

last month’s article at how 

conditional statements are 

formed in the Forth 
language, it may be helpful to look at a 
more detailed example of the IF... THEN 
statement. Let us return to our original 
problem of printing-out any monetary 
sum. 

You may remember that the major 
difficulty occurred when trying to print 
monetary remainders — i.e., pence — of 
less than 10. Instead of being shown as 
‘03’, they were displayed as ‘.3’. Using 
the condition statement, we can now 
do this properly. The final version looks 
like: 

:CPRINT 100/MOD.” £”1.R.”.” DUP 
Oe lP= EESE.. ©O- ENDIF; 

Points to note are that it is written using 
Computer One Forth, so the THEN ap- 
pears as an ENDIF. The ‘.R’ which we 


used previously also prints-out the © 


number, so there is no need to perform 
the operation afterwards, hence the 
missing dot. The new command ‘DUP’ 
duplicates the entry at the top of the 
stack. That is necessary so that the dup- 
lication can be used in the test “is the 
value greater than nine”, creating a flag 
and destroying the duplicated entry. The 
flag is then removed from the stack by 
the IF command, leaving the, pence 
value to be printed either with or without 
a leading zero. 

If you try this, you will probably have 
a problem using large numbers where 
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they suddenly become negative. That 
is due to the limited range of the signed 
integers we are using. Computer One 
Forth, and many other implementations, 
allow access to double-precision num- 
bers and so on. 

For anyone wishing to try example 
programs while following this series, we 
will be using Computer One Forth 
throughout, though Forth is fairly 
standard and should easily transfer to 
any other system without modification. 
Remember that Computer One Forth 
uses ENDIF rather than THEN. There 
will be a few other minor differences be- 
tween implementations but they are 
usually simple word substitutions or very 
minor changes in the syntax of the 
language. 

We will now look at a number of loop 
structures available in Forth. One of the 
most common looping structures found 
in Basic is the FOR... NEXT loop, known 
as FOR .. . END FOR in SuperBasic. 
Forth has an equivalent statement but, 
as you might expect, it looks rather 
different: 
finish start DO {body of loop} LOOP 

The ‘finish’ and ‘start’ indices are 
placed on the stack. The DO removes 
them, places them on the return stack, 
and the body of the loop is executed. 


The LOOP command then increments 
the index and returns the DO statement 
if the index is less than the finish index. 
Otherwise, execution continues after 
the LOOP statement. 

A few conclusions can be drawn from 
the description. First, it should be noted 
that the loop always executes at least 
once, because the test is not carried-out 
until the LOOP statement is reached. 
Second, note that the loop will terminate 
when the two values are equal. There- 
fore if you wanted a loop to operate on 
all the values from ‘1’ to ‘30’ inclusive, 
the initial ‘finish’ index should be set to 
ellen 

In some versions of Forth, the DO re- 
quires the loop variable to follow it. So 
the structure in this case would be: 
finish start DO index 
{body of loop} LOOP 
In Computer One Forth, the index of the 
first, or outer, loop applicable only when 
loops are nested — is assumed to be ‘l’. 
Therefore if you were to write the sequ- 
ence: 

5 CEOOP 16 1) DO: .LOOR GR: 
and then type CLOOP, you would get 
the result: 
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234.567 89401112 13844 415 
ok 

The body of the loop retrieves the 
loop index, |, and places it on to the 
stack. The dot then prints that and the 
loop continues until the index equals 16 
— the finish index. The ‘CR’ after the 
LOOP command just executes a car- 
riage return. 

At present, the loop always incre- 
ments by one but, as with the STEP 
command in SuperBasic, Computer 
One Forth has a special incrementing 
loop. This looks like: 
finish start DO {body of loop} increment 
+LOOP 
So, if we were to change the above de- 
finition of CLOOP to be: 

: CLOOP 16 1 DO! . 2+LOOP CR ; 
we would get the result: 

lke On OMS AS 

ok 

You can, of course, use negative incre- 
ments, as in SuperBasic. Even the loop: 

: CLOOP 16 1 DO i. -2 +LOOP CR ; 
eventually will terminate. That is due to 
the wraparound effect of the twos-com- 
plement numbers used. This loop will 
finish only when it has gone all the way 
through the negative numbers, wrap- 
ped around to the high positive num- 
bers, then decremented to 21, 19 and 
life 

In many basics, it is possible to termi- 
nate the loop ahead of time by jumping 
outside it. Most Forth implementations 
will also have forced termination of this 
form. The Computer One DO . . LOOP 
will terminate at the next test if previously 
it has encountered the word LEAVE. 

There are a number of other loops 
which you are likely to meet. Though 
the exact syntax of them may change 
slightly from one implementation to the 
next, the following description of the 
loops available in Computer One Forth 
is fairly standard. All the other looping 
structures can be recognised because 
they start with the word BEGIN. First, 
there is the infinite loop. It follows the 
form: 

BEGIN {body of loop} AGAIN 


The only way this loop will terminate is 
via an error condition, or a termination 
such as ABORT or QUIT. For instance, 
this form of loop could be used to check 
for key input, say, of a “Y’ or ‘N’ for YES 
or NO. Combining the BEGIN . . ELSE 
with nested IF . . ENDIFs, the definition 
would be something like: 

: YESNO BEGIN KEY DUP 

89 = IF. -YES* ABORT 


ELSE 

78 = IF. “NO” ABORT ENDIF 
ENDIF 

AGAIN CR; 


That construct would continue loop- ° 


ing until either the ‘Y’ (code 89) or ‘N’ 
(code 78) keys were pressed. The only 
new word used here is KEY, which waits 
for a key to be pressed, then places its 
ASCIl value on to the stack. 

The DUP instruction, to duplicate the 
top value of the stack, is necessary for 
the second IF test. If the answer is not 
*Y’, the second IF loop is reached but 
by that time the initial value placed on 
the stack by KEY will already have been 
destroyed. The ABORT command will 
clear the stack, so no values — such as 
the duplicate — will be retained, even if 
the ‘Y’ key is pressed. 

Probably a more useful-looping con- 
struct of this form is the BEGIN . . UNTIL 
loop, which takes the form: 

BEGIN {body of loop} flag UNTIL 

In this instance, the loop body is exe- 
cuted until the ‘flag’ returns true —i.e., 
anon-zero value — at which point execu- 
tion continues after the UNTIL word. 
One example of this, given in the Forth 
manual, will wait until the ENTER key is 
pressed: 

: TEST BEGIN KEY 10 = UNTIL; 
Adding two words, including EMIT, 
which will print the character of the 
ASCII value from the top of the stack, 
will give: 

J TESIy BEGIN: KEYSDUPZEMII 10; — 
UNTIL ; 

In that case, all the characters will be 
displayed, including the ENTER 
(carriage return) which will terminate the 
loop. 


Table 1, Computer One double number extensions. 


Double number 
command 
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Single precision 
command 


Meaning 


Remove value from stack 
Duplicate value at top of stack 
Multiply values at top of stack 
Add values at top of stack 
Subtract values from top of stack 
Print value from stack 
These are all simple 
comparisons but working 
on double numbers 


Converts a signed single number 
toadouble 


The final loop structure is the most 
complex to use but can prove very use- 
ful in certain situations. It takes the form: 
BEGIN {main body} flag WHILE {condi- 
tional body} REPEAT 
The main body of the loop is always 
executed. The flag is then tested and, 
if true, the conditional body of the loop 
is executed and control continues after 
the BEGIN, repeating the main body, 
and so on. 

If the flag is false —i.e., zero — control 
passes to after the REPEAT word. For 
instance, if you were testing the user’s 
response for the correct letter, say, in 
multiple-choice questions, this con- 
struct could be used. If we assume that 
‘A’ is being tested for, then: 

: TEST BEGIN. “lease hit a letter A, B, 
C or D” CR KEY 65<> 

WHILE. “No, that is the wrong answer” 
CR 

REPEAT. “Yes, that is correct” CR; 
would suffice. 

There is one final construct which we 
consider. It is the Forth equivalent of the 
SuperBasic SELEC command, which 
gives the computer a choice of options, 
based on a single parameter, and takes 
the form: 
parameter CASE 

value1 OF {body of 1} ENDOF 

value2 OF {body of 2} ENDOF 

value3 OF {body of 3} ENDOF 
value3 OF {body of 3} ENDOF 
value3 OF {body of 3} ENDOF 
valueN OF {body of N} ENDOF 
{default clause} 

ENDCASE 
For instance, the YESNO construct 
could be re-written as 
: YESNO BEGIN 

KEY CASE 

89 OF . “YES” ABORT ENDOF 
78 OF . “NO” ABORT ENDOF 

. “Please hit Y or N” CR 
ENDCASE 

AGAIN CR; 

You will notice that it is not necessary 
to duplicate the key entry for the second 
test, as in the original example. Another 
variation on the theme would be to en- 
sure that the ‘Please hit Y or N’ message 
was printed at the beginning. Rather 
than duplicate the message at the start 
of the construct, we could change it to: 

: YESNO 0 BEGIN CASE 
89 OF . “YES” ABORT ENDOF 
78 OF . “NO” ABORT ENDOF 
. “Please hit Y or N” CR 
ENDCASE KEY 
AGAIN CR; 


The KEY is not checked for until after 
the ENDCASE, which will occur only if 
neither of the ASCII values for Y or N 
are at the top of the stack. The zero 
before BEGIN ensures that will be the 
case on the first execution of the loop. 
Therefore the message is printed. 
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If you have been trying any of these and each number requires four bytes that they may be fairly small — well within 
examples, and in particular the monet- on the stack. If we wanted to add two the single-precision range. Therefore 
ary example, you will have noticed a double-precision numbers, itis possible just typing them, as we have been 


problem with some numbers. They ap- doing, will stack them as single preci- 
pear to go out of range very easily. The sion. The way round this is to include a 

_single-precision numbers we have been dot in the number. It does not matter 
using have a range of -32768 to 32767. where you place the dot. Both: 


If we are willing to sacrifice negative 


numbers we can alter the range to 0 to 1 = D. 
65535. Most implementations allow that fe aa 


and there will be a range of additional 
will give the answer 1234 but it seems 
sensible always to place the dot at the 
end of the number. 

‘As with unsigned numbers, there is 
a range of special commands for 
double-precision numbers. Some of 
them, corresponding to other com- 
mands we have used are shown in table 
one. 

Anyone using the Computer One 
version of Forth need not worry about 
the floating point commands. 


command words. For instance ‘U.’ is 
the unsigned equivalent of *.’, and will 
print-out an unsigned number. So if you 
were to type-in the expression: 


:ADD 11111 22222 + DUP.CR.UCR; 
you would get the result: 


a Next month we will develop a 
ok complete worked example of a more 


complex program. To be consistent and 
to permit comparison with the previous 
Lisp series, this example will be the 
Knight’s Tour of a chessboard. If you 
are feeling adventurous, you might like 
to try this before looking at next month’s 
program. You are likely to be surprised 
at how much quicker Forth is than 
SuperBasic and especially Lisp. 


where the second number is_ the 
unsigned equivalent of the first. Other 
additional operations include ‘U.R’ for 
“.R’ and ‘UK’ for ‘{’. 

If that range is still not sufficient, dou- 
ble-precision numbers can be used. 
That increases the range still further, 
giving -2147483648 to 2147483647, 
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Say 


For the September competition, Sinclair 
QL World has more than £400 worth of 
software to give away. French sofware 
house Pyramide has provided 20 copies 
of its design utility QL Peintre. The pro- 
gram is one of the best design utilities 
available for the QL and normally would 
cost £19.95. To see what our reviewer 
Ron Massey had to say about it, turn 
to this month’s Utility File on page 28. 
All you have to do to win a copy of QL 
. Peintre is write a short program to pro- 
duce a design on the QL screen. We 
will leave the choice of subject matter 
to you. Anything goes — from abstract 
images to digitised doodles. The only 
restrictions are that the program must 
be no longer than 50 lines and must be 
written in SuperBasic. When you have 
written your program, complete the tie- 
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send your entry on a microdrive car- 
tridge to: 

Picture Competition, 

Sinclair QL World, 

79-80 Petty France, 

London SW1H 9ED 

Senders of the best 20 entries in the 
opinion of the editor will recieve a copy 
opf QL Peintre. Alternatively, prizewin- 
ners may select another program from 
the Pyramide range of Nucleon, Othello, 
Vroom, Wanderer and Mortville Manor. 
(Please indicate alternative choice on 
form.) 

The closing date for the competition is 
monday September 22, 1986. If you 
want to produce some prize-winning 
pixels, you had better get cracking right 
away. 
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LISP interpreter for exploring ‘the language of artificial intelligence’, with 
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The Lost Pharaoh 
Talent Computer 
Systems 

£14.95 


About six months ago there 
was a Spate of ancient 
Egyptian games for the 
Commodore 64 and 
Spectrum. In them, the 
player took the role of an 
archaeologist/explorer, the 
aim being usually to 
discover the buried Pharaoh, 
treasure. 
Talent has decided that if 
the theme is good enough 
_ for other machines it is 900d 
enough for the QL and has’ 
produced The Lost Pharaoh. 
_ Itis essentially a maze game. 
_ You, in the guise of an 
intrepid explorer, must 
search the labyrinth of the 
_ Pharaoh’s tomb for the 
sealed burial chamber. 
There you will find untold 


wealth in the form ofall the — 


Pharaoh’s possessions, _ 
which he was hoping to take 
with him on his trip to the 
hereafter. 

Any maze game would, of 
course, be a dreadful bore 


were it simply a case of 


wandering round and round 
looking for the odd scarab. 
So to enliven things there 
are a few awkward : 
distractions. No game would 
be complete without its 


share of monsters to chase — 
~ you around. The Lost — 
Pharaoh, in addition to the _ 


usual collection of nebulous 
blobs with faces, has snakes, 


scorpions, skeletons, and no — 
doubt one or two others I 


was too busy running away 
from to notice. One 


alternative to running away. 


is to shoot the monsters with 
your blunderbuss, The only 
problem is that the — 
blunderbuss is not 
particularly reliable and at | 
times fails to fire. 
When you are not — 
shooting monsters or — 
running away, the idea is to 
collect keys from various 
parts of the maze. The keys 
open doors and provide 


Zapper. Attack of the disposable nappies. 


Eagle with Zapper 
Eidersoft 


£9.95 


4 


- With two games for the price 


of one —less than &5 each — 
Eidersoft arguably could 
claim to offer the only 
budget software available 


The Lost Pharaoh. looking for the odd scarab, 


access to other chambers, — 
one of which contains the 


treasure. | managed to find — 


what I think was the burial 
chamber but could enter 
only via a dead-end route, a 


2 highly frustrating. 


_ A sandy-looking scroll at 
the bottom of the screen 
provides information on 


- your progress. You start with 


five lives and each time a key 
is collected the tally is | 
incremented, The 
disappointing thing is that — 
when a key is used it is gone 
forever, so you would be 
wise not to run through 
doors willy nilly. Do not do 


for the QL. 

Eagle is a Defender clone. 
For those who shun the 
pleasures of coin-operated 
computing, Defender was, 
and is, an arcade game 
which will go down in 
history as one of the all-time 
greats, alongside such as 
Galaxians, Space Invaders 
and Asteroids. 

The Eidersoft version is, 
by comparison with the 
original, fairly puny, but that 
is not surprising. What is a 
little disappointing is that it 
does not really stand up in 
its own right. 

You control a ship which 
zooms across a single-line 


- whatI didandentera 
_ cul-de-sac viaa door with the © 
_last remaining key, On 6. 
_ have it Close behind you: 


Ss a maze game The Lost 
Pharaoh succeeds 


excellently, Tactically it has 


all the necessary 


requirements but what 
_ really makes it is the 


~ excellent graphics, Egyptian 
hieroglyphics look brilliant — 
in pixels, a fact which — 
probably accounts for the 
general popularity of this 
type of game on other 
machines. I deserves to do. 
as well on the QL. 


landscape and must destroy 


_ the aliens which appear 


every now and then. After 
destroying the first bunch of 
aliens, more cannon fodder 
was difficult to find and 
looking for it soon became 
tedious. 

Zapper, on the other 
hand, is a much better 
implementation of an old 
classic, Galaxians. The 
invading hordes hover — 
menancingly at the top of the 
screen before starting their 
kamikaze-style attack runs. 

You Start the game with 
three ships and receive a 
bonus craft for every 10,000 
points. When the first attack 
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wave is destroyed you get a 
crack at the second and so 
on. 

The graphics are 
interesting, the aliens taking 
various forms from what 
looks like a disposable 
nappy to a Chinese lantern. 
After eight attack waves you 
return to the start. 

My only two complaints 
are that the game does not 
seem to become any more 
difficult as you progress 


. a 


through the levels and even 
more aggravating, was that, 
on occasiions, the aliens 
appeared to be invincible — 
what we used to call not 


taking your shots. 


Asa package it is certainly 


worth the money — Zapper 


just about compensates for 


the deficiencies of Eagle but — 


the old adage you get what 
you pay for undoubtedly 
applies. Do not expect 
anything brilliant, 


+ 


Citadel. East meets west over a cuppa. 


Night Nurse | 
Shadow Games 
29> . 


Night Nurse is not a sickly 
green medicine but a game 
where the nurse must be 
guided round the wards ina 

_ hospital to find the golden 
prescription which will © 
allow her to retire early with 
an eligible young doctor. 
The game involves the 


collection of various items of © 


use to any budding nurse, 
such as thermometers, — 


a bandages and tweezers. 


Not all of the objects 
- remaining in the anes are 
as useful as they might be, 


like the purple medicine 


marked X which, once oe 
causes the nurse — 


layers of clothing and 
quickly be reduced to her 
rather scanty underwear. 
Those rounds of the wards 
are naturally hindered by — 
the presence of a range of 


bacterial-looking creatures 


and a sex-starved doctor 
who dances through the 


wards. Encounters with the 
pests understandably 


reduce the nurse’s stamina 


and therefore affect the 


ke score. 


The level of humour in 


Nei nore falls somewhere : 
_ between Benny Hill and a 


Carry On script, with the 


-under-dressed nurse 
straight from the pages of a _ 
Richard Gordon novel. If — 
— that kind of humour is _ 
appealing to you the game - 
will provide good 
entertainment but it can — 

_ wear a little thin after several 
_ plays. : 
“mysteriously to shed a ae 


Shadow Games is 
reported working ona new, 
improved version of the 


game. It may well be worth 


waiting for that, rather than 
parting with your cash now, 
only to feel sick when the 
new version is released. 
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Citadel 
Eidersoft 
£9.95 


The on-screen briefing 
informs you that the year is 
2439. Other than the © 
uncomfortable fact that this 
makes you about 460 years 
old the date is of little 
significance. 

Citadel 5 is a divided city. 
The powers that be have 
decided that as they do not 
get on too well with the folks 
from across town they will 
split the place in two halves 
— East and West. As unlikely 
a scenario for a computer © 


game as you could imagine. — 


The object of the game is 
to re-unite the two zones by 
collecting all the symbols 
scattered around the city. 
This is accomplished in your 
multi-directional variable 
thrust ship. The ship is 
docked in the Western half 
of the city. A quick blip on 
the joystick, or cursor keys, 
which is easier, sends it 
cruising out of the bay. — 

The objects which must 


Night Nurse. Eat your heart out Benny Hill 


be collected to restore 
East-West harmony are 


- teacups and glass vials. 


Picking them up is simply a 
question of manoeuvring 
alongside and touching 
them. The danger is that in 
your incompetence you are 
more likely to smack into a 


_ wall or get shot by the 


defence systems. 

Your craft has an airbrake 
but it can be used only once 
per screen, so to stop you 
must turn the ship round 
and apply some reverse 
thrust. This is where the skill 
enters into it. After a time 
you wiil be able to change 
direction on the move by | 
applying thrust at the correct 
angle to turn corners 
without stopping. 

I must admit to finding the 
game somewhat pedestrian 
but not everyone likes the 


action at a furious place. — 

Citadel will probably appeal 

_to those who enjoy a test of 
skill and accuracy. 


INFORMATION 


Eidersoft 

The Office, Hall Farm, 
North Ockenden 
Upminster, Essex 
RM14 3QH 

Tel: 0708 852647 


Talent Computer Systems 
Curran Building 

101 St James Road 
Glasgow G4 ONS 

Tel: 041 552 2128 


Shadow Games 

1-2 The Cottage 
Maidenhatch 

Tidmarsh near Reading 
Berkshire RG8 8HP 
Tel: 07347 44654 


Eagle, Zapper and Citadel 


are now available on one 
Microdrive, price £16.95 
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SOFTWARE APPLICATIONS 


This month John Barnes 
reports on the unusual 
use of QL is being put to 
in South London 


he Sussex in Streatham, 
south-west London, is an 


ordinary enough — public 
house trom the outside but 
in the last 18 months has un- 
dergone a technological revolution, at 
the centre of which is a Sinclair QL. 

Originally the pub was one of 
London’s first venue houses regularly 
attracting a large number of locals to 
the live entertainment provided but 
through the years its popularity 
diminished. The pub has been refur- 
bished and fitted with the latest audio- 
visual equipment. The new image the 
Sussex is presenting to the world has 
helped to re-establish its position as a 
top London pub and Whitbread’s lead- 
ing house in the U.K. 

The audio-visual system installed re- 
cently incorporates satellite television 
facilities, broadcasting regularly selec- 
tions of Music Box, the 24-hour satellite 
music channel, a 10-monitor Phillips hi-fi 
video network, compact disc and more 
than £15,000 worth of high-quality 
audio equipment. 

The QL plays a very important part in 
the entertainments system, as Adrian 
Pepin, the licensee, explains: 

“We did not want to show videos all 
the time but neither did we want blank 
screens, SO we decided to use a com- 
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puter to enchance the visual side of the 
system.” 

The QL therefore provides a news 
service, which is particularly popular 
during lunch-time sessions, an in-house 
advertising facility publicising forthcom- 
ing events at the Sussex, and a 
message service providing an added 
dimension to music dedications. 

Text is keyed into the computer, with 
brackets displayed on the monitor act- 
ing as a scale indicating how many 


characters can be fitted across the 
width of the screen. Messages, adver- 
tisements and up-to-date news are 
displayed and checked for errors, then 
scaled individually to save memory, on 
the smaller Hitachi 10in. monitors be- 
fore they are transferred to the larger 
Phillips matchline monitors and broad- 
cast round the bar. 

The program has many additional fea- 
tures, all of which have been written-in 
to provide ease and speed of operation. 
A good example is an automatic check 
on colour combinations which prevents 
the operator concocting indefinable 
combinations of colour; there is also a 
colour update option which changes the 
screen colour automatically after an in- 
terval has elapsed. 

The man behind the QL in every sense 
is Trevor Heartfield, a professional com- 
puter programmer with Citibank. He 
wrote all the programs used at the 
Sussex and was instrumental in the de- 
cision to buy a QL. Originally the function 
of the QL was to be performed by a 
Commodore 64 with a scratch-pad but 
the Sinclair was chosen because of the 
greater number of technical possibilities 
it could offer. 

Heartfield explains: “The pleasant 
thing about the QL, even in its basic 
form, is that there are two Microdrives, 


two serial ports, the hardware available 
to expand the memory to half a mega- 
byte if necessary, multi-tasking and a 
brilliant instruction set.” The QL has 
proved, in the short period it has been 
used, a remarkably reliable machine, 
performing adequately everything which 
has been demanded of it. 

. Because of the reputation Microdrive 
cartridges had acquired Heartfield had 
resigned himself to the fact that they 
might have to invest in disc drives, but 
that has not been neccessary, as only 
two Microdrive cassettes have gone 
down, both of which had back-ups and 
were re-formatted, so presenting no 
further problems. 

As a_ professional programmer, 
Heartfield is also able to appreciate what 
can be achieved on the QL by any 
proficient person. “l am familiar with all 
kinds of Basics, working in a business 
environment, and SuperBasic is pleas- 
ant because it has some structure in it 
which allows for fairly well-structured 
programs, but there are certain little 
things which are not the same as 
standard Basic, so you can get caught.” 

Despite that, he has written some 
programs which have proved useful at 
the Sussex and has many programming 
projects he hopes to complete. One of 
them is a screen editor. It would not 
only provide the computer operator with 
a very useful aid but would also repre- 
sent a considerable time-saving during 
busy periods. 

The growing popularity of the mes- 
sage and news services are also making 
it a necessity, as the increasing amount 
of information which has to be fed into 
the computer allows less time for the 
important task of error-checking. 

The editor, however, would help to 
rectify that. Once the system has been 
running for a period, any operation 
difficulties which may arise will be cor- 
rected and then Heartfield hopes to write 
several programs to utilise the computer 
even more. Such improvements 
definitely will enhance the already- 
impressive audio-visual system and 
make it much more versatile. 

Pepin is convinced that is the way the 
computer ultimately will be used at the 
Sussex and is finding that it is invaluable 
for marketing, promotions and 
announcements or for communicating 
with customers. 

The use of the QL is only in its infancy 
at the Sussex and both men intend to 
do a great deal more with it. “This is 
literally phase one.” What we intend to 
do with this machine and the interest 
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that has been shown in itis of real impor- 
tance to the acceptance of computers 
for out-front business usage, as 
opposed to their traditional office role”. 
The increasing popularity of the Sussex 
would seem to justify that optimistic 
view. 

Has there been a noticeable increase 
in trade since the entertainments 
system was installed? “We have noticed 
a 25 percent increase in custom and 
the computer is a very important part 
of that, as the interest generated in mes- 
sages and news items has shown. It is 
a facility which cannot be measured 
against anything else”. 


Peter Cowley investigates 
how it is possible to widen 


the choice of printed out- 
put from Quill. 


o that you can employ in Quill 
the various foreign characters 
and also have a wider choice 
of print modes, such as pica, 
elite, italic, double width, in 
a single document, here are some hints 
on how to extend Quill to use the full 
range of characters of your printer. 

The Quill printer driver is set for the 
U.S. character set and produces only 
one “foreign” character, the £ sign. How 
the Quill document appears in print de- 
pends on whether the printer DIP 
switches are set for pica, italic or what- 
ever. In Quill, you are provided with 
choices between bold, underline, sub- 
script and superscript but there is no 
facility for printing in other modes or for 
calling-up more foreign characters, un- 
less you stop and make some tedious 
changes to the DIPs or the printer driver. 

If you are working in SuperBasic, 
there is no difficulty. The standard 
printer code for selecting a different 
foreign language font is ESC, R, n where 
the value of n allows you to select the 
required font. In a SuperBasic program 
you put in a line equivalent to this, e.g., 
100 PRINT #4, CHR§(27); 
CHR$(82);CHR§(2) will select German. 

Other numbers in the final brackets 
will select other fonts. All the other 
facilities of the printer are accessible by 
similar insertion of the required codes. 
Quill, however, will not accept those 
codes — it simply reproduces them as 
part of your document. The following 
explains various ways of getting it to 
accept what control codes you want. 
Which method you choose is for you to 
decide. 

The TRANSLATE option. The printer 
driver for Quill Version 2 provides for up 
to 10 translations of single characters. 
TRANSLATE 1 is already set to change 
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July’s article on Data 
protection included an 


incorrect program listing. 
here with our apologies is 
the correct listing. 


200 DEFine PROCedure password 


210 count=0: pwds="* 


220 PRINT#HO, "ENTER PASSWORD" 


230 REPeat key 


240 k®=inkeys(-1) 


to the English set when £ is keyed-in 
and then back to the U.S. set. Inspec- 
tion of the printer driver will show that 
this is achieved by TRANSLATE 1: 
£,ESC,R,,ETX,#,ESC,R,NUL. If you are 
puzzled by the appearance of this, the 
various characters are explained in the 
User Guide under QL Programs Prin- 
ters. 

The point to understand is that this 
translation is making use of the printer 
code ECS,R,n. The beginning 
£,ESC,R,ETX (ETX=3) instructs the 
printer to use the English character set 
for the £; the rest causes the printer to 
revert to the U.S. set. 

Similarly, you can have é in café by 
installing the Quill printer driver with 
TRANSLATE 3: 6,ESC,R,SOL, 
{,ESC,R,NUL (type 131, 
ESC,”R,1,123,27,"R,0). That calls the 
French character set and then reverts 
to U.S. The problem is how to get é on 
to the QL screen? On my early AH QL, 
é is obtained as CHR$(131) though the 
User Guide Character Set indicates 
CHR$ (143)! The keying for CHR$(131) 
is CTRL Shift 3 — pressed all together. 
That produces 6 on the screen and é 
also appears in your printed document. 
If you need only a few odd characters, 
this is the best approach. 

Replace existing Quill options. If you 
need to switch frequently between two 
language fonts, you may prefer to 
replace, say, the BOLD ON instruction 
in the printer driver by ESC, “R,2 (for Ger- 
man). You will then get the German 
characters in Quill when you access 
BOLD by keying F4 B. To allow exit from 
German to U.S., the BOLD OFF instruc- 
tion should be amended to ESC,”R,0. 

The various German characters will 
be listed in your printer handbook under 
the ESC,R,n code. The normal keying 
of [/) {|} ~ will produce the German 
AOUAaAOUB. One point to watch is that 
other TRANSLATES may interfere. If you 
key £ while using the German set it will 
have the effect of reverting to the U.S. 
set, so after £ it is necessary again to 
call BOLD ON. It is possible to call-up 


PRINT#O,*?'$ 

IF CODE (k®#)=10:EXIT key 
PwdS=pwdSeKs 

END REPeat key 
count=count+tl 

IF pud®=pwords:RETurn 
IF count=3:CLS#0: STOP 
CLS#0:GOTO 220 


END DEFine 


alternative character sets covering sev- 
eral languages using the ESC,6 or the 
ESC,|,1 codes. 

Your printer character set may not 
match that of the QL, so foreign charac- 
ters may not appear the same on the 
screen as when they are printed. It is 
easier to cope with only a few such 
characters at a time by calling single 
language sets. 

Other options, using printer codes di- 
rectly within Quill, are possible because 
Epson-compatible printers have alter- 
native keyings for many of the printer 
codés. They use chr$(num), where num 
‘is 128 higher than the usual code, which 
lies in the range O to 127. Leon Heller 
drew attention to that in QL World, 
October, 1985, p.30. Thus Quill will not 
accept the ESC instruction CHR$(27) 
but it will accept the QL keying corres- 
ponding to CHR$(155). The keyings are 
listed under Character Set in the Con- 
cepts section of the User Guide. For 
chr$(155) press the CTRL and ; keys at 
the same time. 

In practice, most printer codes involve 
ESC so, to avoid complicated keyings, 
it is better to set up a keyboard charac- 
ter to be read as ESC, using the TRANS- 
LATE option. Keying the copyright 
symbol will do that if the driver is 
changed to TRANSLATE 6: 127, 27. 
Install this and start a document in Quill. 
If you key-in the copyright symbol, fol- 
lowed without spaces by one or two 
control characters, the printer will be- 
‘have as required. The control characters 
will appear on the screen but will not be 
printed. In that way many of the printer 
facilities can be accessed in Quill: 

4 Italics on, 5 Italics off 

M Elite on, P Elite off 
p1 Proportional on, pO Proportionall off, 
and so on. 

Finally, there is the possibility of using 
more than one printer driver, if they are 
stored under different names in the IN- 
STALL_BAS program. For further de- 
tails see the letters by Jim Knife and 
Peter Singer in Open Channel, Sinclair 
QL World July, 1986, 0 15. 
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Leisure 

Wanderer (Pyramide) 
Othello (Pyramide) 
Vroom (Pyramide) 
Mortville Manor (Py 
Dragon Hold (Rubicon) 
Aquanaut (Micro deal) .. 
Flight Simulator (MD) .. 
Chess (Psion) .......... 
Scrabble (Leisure Gen’) 
BJ Return (Eidersoft) 
Spook (Eidersoft) . 
Karate (Eidersoft) .. 
3D Slime (Datalink) . 


APNE arc vires ta 
ROSNER MSR & wom 
S88ssssssssss 


Special Pack - 
Citadel/BJ 3D/Zapper 
£ 14.95 


Graphics 
TechniQL (Talent) 
QDraw (Talent) .... 
QL Peintre (Pyramide) . 
Nucleon (Pyramide) . 
Cad Pak (Datalink) 
Tasprint (Tasman) 
Tascopy (Tasman) 
Eye-Q (Digital P) .. 
QL Computer ... 
MicroVitec Cub 1451/DQT3 With Stand ...... 
Philips CM 8533 Colour monitor 

Composite Video (phono) 

RGB to Linear input (SCART) 
RGB/RGBI to TTL (for QL) 
plus many other features 
Philips BM7502 Mono Mon .. 
Panasonic KX1080 
Star NL10 

Epson LX80 . 
Epson LX86 .. 
Citizen 120D 
Citizen LSP10 .. 
Quen Data Daisy Wheel 
Canon PJ1080 Colour .. 


> 


Por 


tp ep mtn’? a 
Tyee 
Soka oR ORO: 
S>3ssss3ss8s 


§ 


dicro Anuihs 


224 Tottenham Court Road, London, W1P 9AF. Tel: (01) 580 6382 
Telex 946240 Cweasy G (Quote 19010170) 


Blt Seip 


Tel: (01) 636 2547 


——— 


Lapeuages 
igital Supercharge V1.18 


Digital Forth + Reversi 

Digital Super Monitor .... 
Digital Super Sprite Gen 
Metacomco Latice C ..... 
Metacomco MCC Pascal 
Metacomco Lisp ... 
Metacomco BCPL .. 
Metacomco Assembler .. 
Prospero Fortran 77 .. 
Prospero Pascal ........ 
Talent Assembler Workbench 
Eidersoft Mouse .. 


RBILSRLSRS 


S88S88s8 RSRESSSSSssssssssssssss 


Choice ... 
Toolkit 
Artice .... 
QSpell (Eidersoft) .. 
Archiver. (Eidersoft) .... 
Super Media Manager (DP) 
Mail List (Transform) ............. 
Appointment Dairy (Transform) . 
Stock Control 


Power Line Cleaner .... 
Miracle 256K Expanderam . 


Miracle 512K Expanderam 119. 
Miracle Ram Disc Software £14, 
Miracle/QCode Modaptor £ 38, 


Miracle WS2000 Modem 
Nightingale Modem 


PCML Disc Interface .............ssssssssesssseeeseees 
PCML Dual 3.5” Disc Drive including V/F .... 
Cumana DISC Interface ..........csssscsssesssnsesesees . 
Cumana Dual 3.5” Disc Drive including I/F . £284.00 


Dust Cover for QL 
Cart (Soft) Storage Box .. 
Cart (Hard) Storage Box .. 


aaa Cartridges in 4 Pack 
We also stock other makes of computers, peripherals & software for 


Amstrad, Atari, Commodore (Amiga) etc...... 
All prices are including VAT. Postage above £20 on software is free. 


GSC‘ lease add 50p to order under £20. For computer, printers & monitors ra 
VISA please add £7.50 per item. Postal rates apply to UK only. 
Overseas orders are welcomed. 


VISA AND ACCESS WELCOMED 


i 
il 

Hi ifuiii 
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UK’s LOWEST PRINTER PRICES 


gee? ~=WITH ALL PRINTERS, QL USERS PRINTERS-GUIDE 3” SINGLE DRIVE SYSTEM (.75m byte) Fee eres 

SSS SS SS aay 32” DUAL DRIVE SYSTEM (1.5m byte) 169.00 K 
GOVERNMENT AND OFFICIAL OVERSEAS ORDERS WELCOME PCML INTERFACE (+ 256KRAM& TOOLKIT £220.00 £253.00 
DISK INTERFACE (No RAM Expansion) £87.00 £100.05 


|| PANASONIC 1080U £159 ex VAT £182.50 inc VAT 


MONITORS 
DOT MATRIX 


PHILIPS 7502 GREEN 


MICROVITEC CUB 1451/653 
PLUS NEAR LETTER QUALITY EXVAT Inc VAT CRONE 
SHINWA CP A80 + NLO £165.00 £189.75 
EPSON LX 80 £190.00 £224.25 MODEMS 
CANON 1080A £209.00 £240.35 TANDATA (COMPLETE SYSTEM) £119.00 £136.85 
CANON A55 £345.00 £396.75 
EPSON FX 85 + £360.00 £414.00 
EPSON FX 105 + £455.00 £523.25 
EPSON LQ 800 £515.00 £592.25 
EPSON LQ 1000 £546.00 £627.90 


EPSON LQ 1500 £715,00 COMPUTERS 


SINCLAIR QL ONLY 


COMPLETE PACK SPECIAL OFFER 


THE WORLD'S BEST With EPSON LX80 F/T £619.00 - £711.35 
PRICES ON SINCLAIR QL, 
MICROVITEC CUB 563, 

. PRINTER & ALL LEADS 
AND INTERFACES 


£173.05 £199.00 


DAISY WHEEL 
QUENDATA 1120 ‘ 
EPSON DX100- SPECIAL OFFER: 


£149.00 
£356.00 


£171.35 
£409.40 


With CANON 1156- £842.00 - £968.30 


COLOUR PRINTERS 


EPSON JX-80 - SPECIAL OFFER: With KAGA TAXAN - £581.00 £668.15 


PRINTER INTERFACES 


MIRACLE SYSTEMS £29.95 


MINUTES) 


LEEDS 20 e Junction 24 


NB.From East us 
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MICRODRIVE 


EXCHANGE 


PROGRAM OF THE MONTH 
This month’s Program of the Month is Cad QL by 
Tony Quinn. It is a very sophisticated and much 
enhanced version of the program published in The 
Progs pages. 
It includes many of the features you would expect 
to find in a good CAD package, including rubber 
banding, grids, circles, arcs, boxes, and a fill func- 
tion. In addition there is a symbol designer which 
allows you to create up to 30 symbols for inclusion 
‘in your design. 
CAD QL has been written in Superbasic and com- 
piled using: Digital! Precision Supercharge, so screen 
~ designs, saving and loading can all be accomplished 
in Super-quick time. 


Supercharge is available from Digital Precision 
22 The Avenue, London E4 9SE Price: £59.95 


HOW TO ORDER 


Listed are programs which have appeared as 
listings inside QL World/QL User and Sinclair QL 
World. 

To the right of each program entry is a small box, 
which you should mark with a bold cross if you want 
to order that program. 

Once you have put a cross next to all the programs 
you wish to have copied onto microdrive, simply com- 
plete the rest of the order form and send it along 
with your PO/cheque AND BLANK FORMATTED DRIVE 
to: 

MICRODRIVE EXCHANGE, 

Sinclair QL World, 

79-80 Petty France, 

London SW1. 

If you wish us to supply the drive, please add an 
extra £2.50 for every drive required and mark the 
order form appropriately. 

Please allow 28 days for delivery. 


| No of drives required aaa @ 


DRDER FORM 


Author Language Program Name Price Issue Size 


Giles Todd (b) DIY Assembler £5.00 Mar/Jun 120[ | 
Converts Assembler source into m/c object code 


| Tony Quinn (SC) CAD QL £4.00 Set’86 120, ] 


ADidcock (B) 
Pit your wits against the QL 
Shergold & Tose (B) *Golf £2.00 May 35(_] 
From fairway to green on 50 different courses of varying difficulty 


Williams & Holliday (AQ) Paladin £5.00 Apr 70(] 
The basis of our games programming series — a space invaders type game written entirely machine 
code 


Richard Cross (MB) Sprite Animation £2.00 Apr 50] 
A subtle blend of machine code and SuperBasic that produces a versatile sprite designer and high 
speed animator 

Steve Deary (B) Pacman £1.00 Mar 20(] 
A reasonably fast rendition of the famous arcade favourite 


Andy Carmichael (B) Family Tree £3.00 Aug 100(_] 
Archive program and database for setting up and displaying large family trees 


James Lucy (B) Composer £3.00 Oct 50] 
Composer and play sheet music on the QL 


JMDOWER (B) Mushyman £2.00 
Mushroom munching arcade action. 


PJ Smith (B) *DIY Adventure £1.00 Feb 60[_] 
Askeleton framework where you simply have to slot in the details to create your bespoke adventure 


R Green (B) Qthello £1.00 Aug 25[_] 
A 3D version of the well known board game Othello for one or two players 


SJ Ackers (B) *Touch Type £4.00 Aug 80[] 
Touch typing course — 14 lessons, on-screen keyboard, 800+ word vocabulary and WPM readout 


Rob Sherratt (AQ) FCOPY £4.00 Mar '86 80[_] 
A machine code microdrive utility for turbocharged file copying 


Alan Prior (B) World Map £2.00 
A high resolution multi-coloured map of the world for geography buffs 
B = SuperBasic, SC = Supercharged AO = Assembler + Object Code (ready to run), 
MB = Machine Code + Basic loader 


Connect4 £1.00 Sept 15[] 


Jun/lul’86 15[-] 


Mar ’86 80, ] 


Address 


No of programs ordered 

Total sectors 

(max 200 per drive) 

No of drives sent 

£2.50 each 
Plus postage — packing 


Sub total 
Add VAT @ 15% 


TOTAL TO BE SENT 


Please copy on to Microdrive the programs above which | have indicated with a cross. 
| enclose a cheque/PO to the value of £ .....{made payable to QL World). | understant 
that Sinclair QL World undertakes only to SUPPLY these programs (copied on to 
Microdrive) and accepts no liability for their operation as defined by the author. 
Neither can Sinclair QL World supply additional information about any of the listings 
other than that originally printed. Any article reprints required must be ordered and 
paid for separately at £1 each inclusive of post and packing (2 overseas). Please 
mark the envelope Dept. LB. 


THE 


P-R0 


: A S 


If you’ve a program that is worthy of consideration, send it to ‘The Progs’, 
Sinclair QL World, 79-80 Petty France, London SW1H 9ED. We pay for everything 
published at the usual page rates. 


Computer aided design seems to 
be the flavour of the month for 
the QL. There are no fewer than 
13 commercially-available pro- 
grams which enable you to pro- 
duce on-screen designs with the 
help of your QL. 

This program incorporates 
many of the features you will find 
on professional CAD packages. 
They include rubber banding, 
user-selectable grids, arcs, circles 
and boxes among others. Part 
completed designs can be saved 
to Microdrive and finished at a 
latter stage. 

The version on Microdrive 
Exchange has a number of extra 
features. They have been 


a$(1) 
s$(1) 


18 
11 


DIM 
DIM 


included on the main menu so 
that you know what you are mis- 
sing but, if selected, will not func- 
tion. In addition, the Microdrive 
Exchange version has a symbol 
designer which enables you to 
store much-used symbols and 
recall them for multiple use in 
your designs. 


460 


IF cursor_flag=@ AND a=97 THEN :LINE x,y TO x- 


d,y+d 


478 


IF cursor_flag=@ AND a=65 THEN :LINE x,y TO x- 


d,y+d 


48S 


IF cursor_flag=@ AND a=122 THEN :LINE x,y TO x 


t+d,y-d 


49 


IF cursor_flag=® AND a=9@ THEN :LINE x,y TO x+ 


d,y-d 


58D 


IF cursor_flag=@ AND a=39 THEN :LINE x,y TO x+ 


d,ytd 


518 


IF cursor_flag=@ AND a=47 THEN :LINE x,y TO x- 


d,y-d 


520 
536 
549 
55 
568 
576 
n 

58D 


n 

596 
68S 
6198 
628 
638 
64 
658 
669 


SELect ON a 

=194: d=d- .5: CHANGE_CURSOR_SPEED 

=2@2: d=d+ .5: CHANGE _CURSOR_SPEED 

=192:x=x-d:IF x<1 THEN BLEEP:LET x=g:NEXT main 
=20@:x=x+d:IF x>g THEN BLEEP:LET x=1:NEXT main 
=208:y=y+d:IF y>ga THEN BLEEP: LET y=1:NEXT mai 


=216:y=y-d:IF y<1 THEN BLEEP:LET y=ga:NEXT mai 


=97,65:x=x-d: y=y+d: TEST _DIAGONAL_MOVEMENT 
=122,90: x=x+d: y=y—d: TEST_DIAGONAL_ MOVEMENT 
=39:x=x+d: y=y+d: TEST_DIAGONAL_MOVEMENT 
=47:x=x-d:y=y-d:TEST_DIAGONAL_MOVEMEN'T 
=82,114:REMOVE_GRID 

=2468:OVER @:SET_A_DOT 

=244:OVER @:SET_A PAD 
=105,73:CHANGE_COLOUR: INK #1,cursor_colour: NEX 


T main 


678 


=119,87:OVER 9: WRITE_TO_SCREEN_MENU 


689 =88,120,89,121:1F coordinate_display_flag=@ TH 
EN coordinate_display_flag=1:ELSE coordinate_displ 
ay_flag=@:IF coordinate_display_flag=@ THEN :AT #5 


129 
138 
149 


DIM 
DIM 
DIM 


author$(5@) 
mode$(5) 
col$(5) 


159 
169 
17 
18d 
198 
288 
219 
228 
238 
24 


DIM 
DIM 
DIM 
DIM 
DIM 
DIM 
DIM 
DIM 


clear$(1) 

size$(1) 

symbol_number$(3) 

h$(19) 

v$(19) 

k$(5) 

pco$ (18) 

xt$(19)_ 

DIM text# (58) 

DIM shape_data%(1) 

268 col$="White ":made$="Move " 

27@ coordinate_display_flag=@:x_len=5:y_len=5:coun 
ter=1: qvomp_flag=@: ds=9: d=1:symbol_nr_buffer=8:s_p 
=1:h1=@:v1-=@ 

288 DIM sp(Z1):DIM sp_y(21):DIM sp_x(Z1):DIM sb(21 
): DIM h(2@):DIM v(20) 

318 SET_UP_NEW_WINDOWS 

32@ CHOOSE_A_GRID 

338 INK #1,cursor_colour 

348 cursor_flag=-1 

35@ REPeat main 

368 IF cursor_flag=@ THEN :OVER @:LINE x,y 

370 OVER =1-CURSOR x) ¥j>35522 PRENT! >"; 

388 KEYBOARD_INPUT 

398 OVER -1:CURSOR x,y,-3,-2:PRINT ">"; 

4@@ IF cursor_flag=8 THEN :OVER @:LINE x,y 

410 IF coordinate_display_flag=1 THEN : display 

420 IF cursor_flag=® AND a=216 THEN :LINE x,y TO 
»y-d 
430 IF 
»yt+d 
440 IF 
-d,y 
450 IF 
td,y 


cursor_flag=@ AND a=2@8 THEN :LINE x,y TO 


cursor_flag=8 AND a=192 THEN :LINE x,y TO 


cursor_flag=@ AND a=2@@ THEN 


HEGONS Seay eeses) 


50 


,®,7:PRINT #5," 


69D 
718 
718 


ororkds.— 


86D 
876 
tehs}%) 
898 
IDB 
916 
928 
936 
946 
95D 
96D 
978 
989 


GAT 45,1, 7°PRENT 45; ~ 
©: END LF 2END IF 
=32: CHANGE_CURSOR_MODE 
=69,101: RUBOUT 
=96,66: CHANGE _BORDER_COLOUR 
= 76,188: LOAD_DIAGRAM 
= 83,115:SAVE_DIAGRAM 
=215: AUTHOR_OF_QCAD_QCOMP 
=74,1@6: JOIN_DOTS : 
=67,99:CLEAR_SCREEN: IF a$=="y" THEN CHOOSE_A_G 


:END IF 


=49: BLEEP 
=59:ARCS_BOXES CIRCLES 
=53:d=5:INK #5,6:AT #5,4,11:PRINT #5," 
,1@:PRINT #5,d 

=232: RUBBER_BANDS 

ON a = REMAINDER : NEXT main 

END SELect 

END REPeat main 

DEFine PROCedure CHOOSE A GRID 
INK #6,2:AT #6,90,135:PRINT #6,"Dot 
*®” for OL-COMP" 
KEYBOARD_INPUT: CLS 

SELect ON a 
=83,115:SQUARE_GRID: QCAD_MENU: QCAD_LOGG 
=68, 100: DOT_GRID: OCAD_MENU: OCAD_LOGO 
=REMAINDER :OCAD_MENU: QCAD_LOGO 

END SELect 

END DEFine 

DEFine PROCedure CHANGE_CURSOR_SPEED 
INK #5,6 

IF d<.5 THEN d=2@:END IF 
IF d>2@ THEN d=.5:END IF 
AT #5,4,11:PRINT #5," 

AT #5,4,1:PRINT #5, "Step 


SEA 


Square : N 


>" AT #5,4,10: PRINT 
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#5,d 
999 END DEFine 
1028 DEFine PROCedure CHANGE_COLOUR 
1918 IF cursor_colour=6 THEN cursor_colour=4:ELSE 
cursor_colour=6:END IF 
1928 INK #1,cursor_colour:STRIP #5, cursor _colour 
193@ IF cursor_colour=6 THEN :col$="White ":INK #5 
,»O:AT #5,2,1:PRINT #5,col#:END IF 
1949 IF Gaceor estes THEN :col$="Gresn 
,@:AT #5,2,1:PRINT #5,col$:END IF 
1859 PAPER #5,2Z 
1@6@ END DEFine 
1976 DEFine PROCedure display 
198@ INK #5,@:STRIP #5,4 
199@ AT #5,9,8:PRINT #5, 
“ o" 
1106 AT #5,1,8:PRINT #5,"Y >” 
" g 
1110 IF x<1@ THEN AT #5,9,11:PRINT #5," 
,13:PRINT #5,x 
1126 IF x>9. 5 AND x<1@@ THEN :AT #5,@,11:PRINT #5, 
" "“[AT #5,90,12:PRINT #5,x 
113 IF x99, 5 THEN AT #5, @,11:PRINT #5, x 
1146 IF y<1@ THEN AT #5,1, i. PRINT #5, 
,»13:PRINT #5,y 
1159 IF y>9.5 AND a THEN AT #5,1,11:PRINT #5," 
“AT #5,1,12:PRINT #5, 
1160 PAPER #5,2: INK #56 
1179 END DEFine 
1189 DEFine PROCedure QOCAD_MENU 
1198 CSIZE #4,9,0:CSIZE @,@:PAPER #4,4:CLS#4:BORDE 
R #4,1,255 
1282 BORDER #6,1,255:CLS#6 
1210 INK #4,@0:AT #4,90,2:PRINT #4,"Commands :” 
1228 OVER cursor_flag 
1238 AT #4,1,2:PRINT #4,"Border" 
1249 AT #4,2,2:PRINT #4,"Clear" 
1258 AT #4,3,2:PRINT #4,"Erase" 
1260 AT #4,4,2:PRINT #4,"Ink " 
1278 #4,5,2:PRINT #4,"Join" 
1289 #4,6,2:PRINT 44, “Load” 
1298 #4,7,2:PRINT #4, “Merge” 
1388 #4,8,2:PRINT #4, "New" 
1318 #4,9,2:PRINT #4,"0ld" 
1326 #4,10,2:PRINT #4,"Print" 
1338 #4,11,2:PRINT #4, "Remove" 
1346 #4,12,2:PRINT #4,"Save" 
1356 #4,13,2:PRINT #4,"“Write" 
1368 #4,14,2:PRINT #4,"X - Y" 
137@ STRIP #4,2: INK #4,6 
1388 AT #4,16,2:PRINT #4," Fi - Bands " 
1390 AT #4,17,2:PRINT #4," F4 - Pad " 
1490 AT #4,18,2:PRINT #4," F5 - Point ” 
1418 PAPER #4,4 
1426 END DEFine 
1430 DEFine PROCedure SET_A_PAD 
1446 DINE x-1 59-1 hOrx 6 TO y+ TO) x. Si iy Aer 
ORs omya ie LOesc—1 Ohi — 
1458 OVER cursor_flag 
1469 END DEFine SET_A_PAD 
1470 DEFine PROCedure SET_A DOT 
1489 FILL T2GINE x=1,y+1 TO xt1,y+l TO x1, y—1 10 
cay Olx—d yt Th 16 
1498 OVER cursor_flag 
15@@ END DEFine 
1510 DEFine PROCedure TEST_DIAGONAL_MOVEMENT 
1526 IF y<1 THEN LET y=ga 
153@ IF x>g THEN LET x=1 
1540 IF x<i THEN LET x=g 
155@ IF y>ga THEN LET y=1 
156% END DEFine 
1574 DEFine PROCedure WRITE_TO_SCREEN_MENU 
158@ IF qcomp_flag=@ THEN -INK #4,2:STRIP #4,6:AT 
#4,13,1:PRINT #4," Write “:PAPER #4,4: INK # 
4,9:END IF 
1596 CLS#6:INK #6,2:size=1 
1606 AT #6,06,19:PRINT #6,"[{ 1 ] Normal 
g: [ 3 ] Wide Text" 
1618 KEYBOARD _INPUT 
1626 IF CODE (a%)<>z7 AND CODE (a$)<>49 AND CODE ( 
a$)<>5@ AND CODE (a%)<>51 THEN :GO TO 1619 
1638 SELect ON a 
164@ =49:CSIZE #1,6,@:size$="1" 
165@ =58:CSIZE #1,0,1:sizeg$="2" 


“:INK #5 


"X >" :AT #5,0,14:PRINT #5, 
:AT #5,1,14:PRINT #5, 


“AT #5,0 


“AT #5,1 


{2s} -Len 
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1668 =51:CSIZE #1,1,1:size$="3" 

167% =27:GO TO 1780 

1688 END SELect 

1699 WRITE_TO_SCREEN 

1726 CLS#6 

1716 IF qcomp_flag=@ THEN :AT #4,13,1:PRINT #4," W 
rite “:CSIZE #1,9,0 

1726 OVER cursor_flag 

1738 END DEFine 

174® DEFine PROCedure QCAD_LOGO 

175@ BORDER #5,1,255:PAPER #5,2:INK #5,0 

176@ CLS #5:CSIZE #5,9,1 

1770 AT #5,0,1: UNDER #5,1:PRINT #5, 
@,@: UNDER #5,0:INK #5,4 

1780 INK #5,6 

1790 AT #5,4,1:PRINT #5,"Step 
T #5,d 


"CAD": CSIZE #5, 


>": AT #5,4,10: PRIN 


[1600 AT #5,3,1:PRINT #5,"Symbol >":AT #5,3,10:PRIN 


T #5, Sosy Sateen 

1818 INK #5,@:STRIP #5,cursor _colour 
1820 AT #5, 2, 1: PRINT #5, col$ 

1838 PAPER #5,2 

1848 INK #5,2:STRIP #5,6 

1858 AT #5,2,8:PRINT #5,mode$ 

1860 PAPER #5,2 

1879 END DEFine 

188@ DEFine PROCedure CHANGE_CURSOR_MODE 
1899 IF cursor_flag =-1 THEN cursor_flag =@:ELSE c 
ursor_flag =-1 


}199G INK #5,2 


1919 IF cursor_flag=-1 THEN mode$="Move "“:STRIP #5 
,6:AT #5,2,8:PRINT #5,mode$ 


11920 IF cursor_flag=@ THEN mode$="Draw ":STRIP #5, 


6:AT #5,2,8:PRINT #5,mode$ 
193@ PAPER #5,2 
1948 OVER cursor_flag 
195@ END DEFine CHANGE_CURSOR_MODE 
1969 DEFine PROCedure KEYBOARD_INPUT 
197 a$=INKEY$(-1):a=CODE (a$) 
198@ END DEFine 
1992 DEFine PROCedure SQUARE_GRID 
2000 INK #1,2:OVER @ 
2010 FOR i = 2.5 TO rx STEP 2.5 
2020 LINE i,2.5 TO i,ry 
2038 NEXT i: END FOR i 
2049 FOR i=2.5 TO ry STEP 2.5 
285 LINE 2.5,i TO rx,i 
2869 NEXT i:END FOR i 
207@ INK #1,6:OVER cursor_flag 
2989 END DEFine 
2099 DEFine PROCedure BLEEP 
219G BEEP 19000,1000,10,190,10 
2116 END DEFine 
2126 DEFine PROCedure CLEAR_SCREEN 
wad INK #4, 2:STRIP #4,6:AT #4,2,1:PRINT #4," 
: INK #4 ,@: PAPER #4,4 
2149 AT #6,9,18: PRINT #6," Enter CY )itorCledr Se 
reen” 
2158 KEYBOARD_INPUT:IF a$=="y" THEN 
2168 CLS 
2170 END IF 
2188 CLS#6:AT #4,2,1:PRINT #4," Clear 
2198 END DEFine 
2290 DEFine PROCedure RUBOUT 
aie INK #4,2:STRIP #4,6:AT #4,3,1:PRINT #4,” 
i : PAPER #4,4: INK #4,8 
2220 INK #6,2:PRINT #6, Move Rubber <>?= : ’E’ 
= Erase a “G7 = Cursor Sige, = i RSG 5] ss 
2238 REPeat rubber 
2248 IF coordinate _display_flag=1 THEN : display 
2250 OVER -1 
2268 LINE x,y TO x+x_len,y TO x+x_len,y-y_len TO x 
»y-y_len TO x,y 
227@ KEYBOARD_INPUT 
2289 LINE x,y TO x+x_len,y TO x+x_len,y-y_len TO x 
»y-y_len TO x,y 
2296 SELECT_INPUT 
230.IF a$=="E" THEN :OVER 9:FILL 1:INK @:LINE x,y 
TO xt+x_len,y TO x+x_len,y-y_len TO x,y-y_len TO x 
»y: FILL @: INK cursor_colour 
2316 SELect ON a 
232 =27:EXIT rubber 
2336 =67,99: CHANGE _RUBOUT_CURSOR_SIZE:LINE x,y TO 


Clea 


Eras 


51 


ai elensy LO x<tx hen. y-yeven. WOst yo yehem LO. x,.7 6 

LS#6:PRINT #6," Move Rubber <>?= : ’E’ - Erase 

Poe Ae CunSOr oor Ze. of Bot 4 

2348 END SELect 

2358 END REPeat rubber 

2368 cursor_flag=-1:CLS#6:AT #4,3,1:PRINT #4," Era 

se 

2378 END DEFine 

2380 DEFine PROCedure CHANGE _RUBOUT_CURSOR_SIZE 

2399 CLS#6:AT #6,9,9:PRINT #6,"Use Cursor Keys to 

adjust Size. [ ESC ] to Return" 

2460 REPeat cursor_loap 

2410 OVER -1:LINE x,y TO x+x_len,y TO x+x_len,y-y_ 

len TO x,y-y_len TO x,y 

2420 KEYBOARD_INPUT 

2438 LINE x,y TO x+x_len,y TO xt+x_len,y-y_len TO x 

e¥ay_wen TO x,y 

244@ SELect ON a 

245@ =27:LINE x,y TO x+x_len,y TO x+x_len,y-y_len 

TO x,y-y_len TO x,y:EXIT cursor_loop 

2468 =2@@:x_len=x_lent+1:IF x_len>=4@ THEN x_len=4@ 

247@ =192:x_len=x_len-1:IF x_len<=Z THEN x_len=2 

2488 =208:y_len=y_len-1:IF y_len<=2 THEN y_len=2 

2498 =216:y_len=y_len+1:IF y_len>=4@ THEN y_len=49¢ 

2596 END SELect 

251@ NEXT cursor_loop 

2526 END REPeat cursor_loop 

2538 END DEFine 

254@ DEFine PROCedure SELECT_INPUT 

255@ SELect ON a 

2560 =88,128,89,121:1F coordinate_display_flag=@ T 

HEN coordinate_display_flag=1:ELSE coordinate_disp 

lay_flag=@:IF coordinate_display_flag=@ THEN :AT # 

5,0,7:PRINT #5,~ “SAT #5,1,,7:PRINT #5, 7 
“:END IF :END IF 

2578 =194: d=d—.5: CHANGE_CURSOR_SPEED 

2586 =53:d=5:INK #5,6:AT #5,4,11:PRINT #5,” 

#5,4,10:PRINT #5,d 

259@ =2@2: d=d+.5: CHANGE_CURSOR_SPEED 

26@@ =192:x=x-d: IF x<2 THEN BLEEP: x=2 

261@ =97,65 :x=x-d:y=yt+d: TEST _DIAGONAL_MOVEMENT 

2620 =200:x=x+d:IF x>g THEN BLEEP: x=g 


263@ =122,90:x=x+d: y=y—-d: TEST_DIAGONAL_MOVEMENT 
264@ =208:y=yt+td:IF y>ga THEN BLEEP: y=ga 


2659 =39: x=x+d: y=y+d: TEST_DIAGONAL_MOVEMENT 
2669 =216:y=y-d:IF y<3 THEN BLEEP: y=3 

2678 =73,105: CHANGE COLOUR 

268@ =47:x=x-d: y=y-d: TEST_DIAGONAL_MOVEMENT 


2699 END SELect 
2702 END DEFine 
2719 DEFine PROCedure CHANGE_BORDER_COLOUR 
2720 INK #4,2:STRIP #4,6:AT #4,1,1:PRINT #4," 
er ":PAPER #4,4:INK #4,9 

2730 AT #6,0,15:PRINT #6," Press < = [ ESC ] Sets 
Border Colour" 

2749 REPeat bors 

275@ KEYBOARD_INPUT: IF a<>27 AND a<>192 AND ax<>2@@ 
THEN GO TO 275@:END IF 

2760 IF a=27 THEN : EXIT bors:END IF 

2770 IF a=192 THEN pc=pc-1:IF pe <=@ THEN LET pco=@ 
:END IF :END IF 

2789 IF a=2@@ THEN po=pc+1:IF pe »>254 THEN LET pe= 
Z5S:END IF  :END IF 

2796 BORDER #1, (pw), (pc) 
2820 NEXT bors 

2818 END REPeat bors 
2822 AT #4,1,1:PRINT #4," 
2830 END DEFine 

2849 DEFine PROCedure AUTHOR_OF_QCAD_OCOMP 
285@ INK #6,6:STRIP#6, 2: author$=" # 

OMP copyright A.Quinn e 
2860 REPeat title 

287@ a$=INKEY$(5):IF at<> 


Bord 


Border 


CAD & QC 


“THEN EXIT title: END IF 


2880 AT #6,@,9:PRINT #6, authors; : author$=author$(z 
TO)& author$(1) 

2898 END REPeat title 

290@ PAPER #6,@6:CLS#6: INK #6, 2° 

2919 END DEFine 

292@ DEFine PROCedure WRITE_TO_SCREEN 

2930 CLS#6: INK #6,2 

2949 INPUT #6," Enter Text > 
2959 OVER -1 


“;text$ 


52 


2960 CLS#6:AT #6,%9,1@:PRINT #6," 
ired Position & Press ’ENTER’" 
2978 REPeat loop_write 

2988 IF coordinate_display_flag=1 THEN display 
2998 : 

39@@ CURSOR x,y,-3,-5:PRINT texts; 

3018 KEYBOARD_INPUT 

3828 CURSOR x,y,-3,-5:PRINT text$; 

3830 SELECT_INPUT 

3@4@ IF a=1@ THEN EXIT loop_write 

3859 END REPeat loop_write 

3@6@ OVER @:CURSOR x,y,-3,--5:PRINT texts; 

307 CSIZE #1,9,0 

3889 END DEFine 

3899 DEFine PROCedure DOT_GRID 

3108 INK #1,2:OVER @ 

SHIDPRORSIS= 2. 5eTOerx STEP 2-5 

S120) POR 3) = Zan TO vy STIBP 225 

313 POINT i,j 

314@ NEXT j:END FOR j 

315@ NEXT i:END FOR i 

3166 INK #1,cursor_colour: OVER cursor_flag 

3170 END DEFine 

3188 DEFine PROCedure SET_UP_NEW_WINDOWS 

3190 SCALE 1@0,@,@:MODE 4 

3268 cursor_colour=6: symbol_number=: cursor_flag=- 
1: g=125: ga=10@:rx=122.5:ry=97.5:x=10: y=8Q: pw=1:pc= 
4 

3218 WINDOW #1,411,243,162,0:BORDER #1, (pw), (pc):F 
APER #1,9:CLS#1 

322@ OPEN #Z,scr_:WINDOW #2,512,256,0,6:PAPER #2,@ 
: INK #2,9 

323@ OPEN #4,con_:WINDOW #4,180,200,0,@:BORDER #4, 
1,255:PAPER #4,4:CLS#4 

3246 OPEN #5,con_:WINDOW #5,108,55,@,201:BORDER #5 
,1,255:PAPER #5, 2:CLS#5 

325@ OPEN #6,con_:WINDOW #6,411,12,19@2,244:BORDER 
#6,1,255:CLS#6 

3266 END DEFine 

327@ DEFine PROCedure REMOVE_GRID 

3286 INK #4,2:STRIP #4,6:AT #4,11,1:PRINT #4," Rem 
ove "“:INK #4,@:PAPER #4,4 
3290 AT #6,0,26:PRINT #6," Enter ’Y’ 
q" 

33@@ KEYBOARD_INPUT:IF a$=="Y" THEN 
3318 RECOL #1,9,9,0,8,4,4,6,6 

332@ END IF 

3338 CLS#6:AT #4,11,1:PRINT #4," Remove 

3346 END DEFine 

335@ DEFine PROCedure RUBBER_BANDS 

3366 CLS#6:AT #6,9,2:PRINT #6,"Rubber Bands : 
Cursor <>?= { ENTER Jj Set PeSse ] Retusim: 
3378 OVER -1 

3380 xl=x:yl=y 

3398 REPeat loop 

3408 a=G 

3416 IF coordinate_display_flag=1 THEN display 
3420 CURSOR <x; ¥,,— 55 Da PREND = cb 3s ENB x Fe ayel “TO ce ay, 
343@ KEYBOARD _INPUT 

3440 - CURSOR x,y.,-.3,—-92 PRINT 


345@ SELECT_INPUT 
346@ SELect ON a 
347% =27:EXIT loop 
348@ =1@:OVER @:LINE x1,y1 TO x,y:EXIT loop 
3496 END SELect 
35@@ END REPeat loop 
3518 IF a<>z7 THEN GO TO 3379 
3526 CLS#6 
3538 END DEFine 
DEFine PROCedure REMOVE_WINDOWS 
BORDER #4,1,9:BORDER 4#5,1,0:BORDER #6,1,9 
PAPER #4,@:PAPER #5,@:CLS#4:CLS#5: CLS#6 
END DEFine 
DEFine PROCedure SAVE_DIAGRAM 
INK #4,2:STRIP #4,6:AT #4,12,1:PRINT #4," Sav 
“:INK #4,0:PAPER #4,4 
CLS#6 
ENTER_DEVICE 
IF medium$="" THEN GO TO 3716 
IF ds=@ THEN :GO TO 3679 
IF ds=-? THEN : BLEEP: GO TO 368@:END IF 
IF ds=-8 THEN : BLEEP: PRINT #6," Already exist 
to overwrite”: KEYBOARD INPUT: IF a$=="Y" THEN 


Move Text to Requ 


to Remove Gri 


Move 


ee eae Se Nee: lye yee meaer ety, 
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GO TO 366@:ELSE GO TO 36@@:END IF 
366@ DELETE mediums 
3678 CLS#6:AT #6,0,1:PRINT #6," 


:END IF 
Please wait 


3688 REMOVE_WINDOWS 

3698 SBYTES medium$,1319072,32767 

3708 QCAD_MENU: QCAD_LOGO 

3710 CLS#6:AT #4,12,1:PRINT #4," 

3728 END DEFine 

3730 DEFine PROCedure LOAD_DIAGRAM 

3740 INK #4,2:STRIP #4,6:AT #4,6,1:PRINT #4," Load 
":INK #4,0:PAPER #4,4 

3758 CLS#6 . 

3768 ENTER_DEVICE 

377@ IF medium$="" THEN GO TO 3846 

3788 IF ds=-7 THEN :BLEEP:GO TO 3740:END IF 

3796 IF ds=@ THEN :BLEEP:AT #6,@,1:PRINT #6,"Does 

not exist - Press a Key":KEYBOARD_INPUT:GO TO 3756 

:END IF 

3880 CLS#6:AT #6,0,1:PRINT #6,” Please wait 


Save 


3810 REMOVE_WINDOWS 

382 LBYTES medium$, 131072 

3838 QCAD_MENU: QCAD_LOGO 

3840 CLS#6:AT #4,6,1:PRINT #4," Load 

385@ END DEFine 

3860 DEFine PROCedure JOIN _DOTS 

3878 1lco=G 

388@ INK #4,2:STRIP #4,6:AT #4,5,1:PRINT #4," 
“:INK #4,@:PAPER #4,4 

3899 AT #6,0,1:PRINT #6,"Move cursor <>?= 

Jef-Enter j-[ ESE 

3908 OVER -1 

391@ LET h(@)=x:LET v(@)=y 

392@ AT #6,6,46: INK #6,6:PRINT #6,"Points set >":A 

T #6,9,59:PRINT #6,1lc 

3938 REPeat loop 

3949 IF coordinate_display_flag=1 THEN :display:EN 

D IF 

3950 CURSOR x,y,-3,-5:PRINT "+"; 

39608 KEYBOARD _INPUT 

397@ CURSOR x,y,-3,-5:PRINT "+"; 


Join 


[ Space 


3986 SELECT_INPUT 
3998 IF a=32 THEN OVER @:POINT x,y:OVER -1:le=lctl 
th(lc)=x:v(le)=y:AT #6,0,59: PRINT #6,lc:IF 1lc=19 T 


HEN :LET a=10:END IF -:END IF 
4@@@ IF a=1@ AND lc=Z THEN :GVER @:LINE h(1),v(1) 
TOMh Gly tts (hi), DLV 2a) SrOrh C14 (x= Ch (1) 
DIV Z2,y TO x,y:GO TO 4@49:END IF 
4019 IF a=1®@ AND |lc>2 THEN : OVER @:INK cursor_colo 
UEoROR f=1TO Ve-1GiIne hit) vii LO natty Git) 
:NEXT i: END FOR i: BLEEP:GO TO 4@46:END IF 
4929 IF a=27 THEN EXIT loop 
4932 END REPeat loop 
4040 INK #6,2:CLS#6:AT #4,5,1:PRINT #4," 
“:OVER cursor_flag 
495@ END DEFine 
4@6@ DEFine PROCedure ARCS_BOXES CIRCLES 
4070 CLS #6:AT #6,0,15:PRINT #6," Arcs 
cles - Enter Prefix" 
4980 KEYBOARD INPUT: IF a=27 THEN GO TO 4149:END IF 


4990 IF a<>27 AND a¢<>97 AND a<>99 AND a<>9@ AND ax 

765 AND a<?>66 AND ac>67 THEN.: BLEEP :GO TO 4@69:EN 

D, IF 

4190 IF a=97 OR a=65 THEN DRAW_A_CURVE:END IF 

411@ IF a=99 OR a=66 THEN DRAW_A CIRCLE: END IF 

4120 IF a=98 OR a=67 THEN DRAW_A_ BOX: END IF 

413@ OVER cursor_flag 

4143 CLS#6 

415@ END DEFine 

416 DEFine PROCedure DRAW_A_CURVE 

4179 cl=0:c=@:hl=x:vil=y: INK cursor_colour:OVER -1 

4186 CLS#6:AT #6,0,8:PRINT #6," Arcs Move Cursor 
<>?= [ Space to Set end Point J” 

4199 POINT x,y 

42@@ REPeat loop_curve 

4210 IF coordinate_display_flag=1 THEN : display 

AZ 2O SCURSOREE yin Seo PREND set 

4239 KEYBOARD_INPUT 

4249 CURSOR x,y,-3,-5:PRINT "+"; 

425@ SELECT_INPUT 

4260 IF a=19 THEN : OVER cursor_flag:EXIT loop_curv 

e:END IF 


Join 


Boxes Cir 
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as IF a=32 THEN :POINT x,y:EXIT loop_curve:END I 

428@ NEXT loop_curve 

4299 END REPeat loop_curve 

4309 CLS#6:AT #6,0,1@:PRINT #6," Arcs 
{ ENTER to Set Curve & Return ]" 

4318 REPeat loop_curves 

4320 KEYBOARD_INPUT 

433@ OVER -1:ARC hi,vl TO x,y,c 

4349 IF a=1@ THEN :EXIT loop_curves:END IF 

435@ IF a=192 THEN LET cl=.1:END IF 

4360 IF a=200 THEN LET cl=-.1:END IF 

437@ c=ct+cl y 

4388 ARC hi1,vl1 TO x,y,c 

4399 NEXT loop_curves 

4496 END REPeat loop_curves . 

4410 OVER @:ARC hl,vl TO x,y,c:FILL @: OVER cursor_ 

flag 

4420 CLS#6 

4430 END DEFine 

4449 DEFine PROCedure DRAW_A_ CIRCLE 

445@ CLS#6:AT #6,0,8:PRINT #6," Circle : 

Seo Shere <— | J eNtER Io to. Set. 

4468 cir=9:rd=1:tilt=9 

4470 REPeat loop_circle 

4489 KEYBOARD_INPUT 

4499 OVER -1:CIRCLE x,y,cir,rd,tilt 

4500 IF a=1@ THEN :EXIT loop_circle:END IF 

4510 IF a=216 THEN : rd=rd-.1:1F rd>1 THEN rd=1:EN 

DIF :END IF 


Press < = 


Press <= 


452@ IF a=192 THEN :cir=cir-1:END IF 
rd=rd+..1-1F -rd<.1-THENe-rd=. 1: 


4536 IF a=208 THEN : 
END IF :END IF 
4546 IF a=20@ THEN :cir=cir+1:END IF 

455@ IF a=196 THEN :tilt=tilt+.1:IF tilt>16@ THEN 


438@ ARC hli,vl TO x,y,c 

4390 NEXT loop_curves 

4496 END REPeat loop_curves 

4419 OVER @:ARC hl,vl TO x,y,c:FILL @: OVER cursor_ 
flag 

4422 CLS#6 

4438 END DEFine 

4449 DEFine PROCedure DRAW_A_CIRCLE 
445@ CLS#6:AT #6,0,8:PRINT #6,“ Circle : 
>? [ Shift <= ]~( ENDER } to Set” 

4460 cir=9:rd=1:tilt=@ 

4476 REPeat loop_circle 

4486 KEYBOARD_INPUT 

449@ OVER -1:CIRCLE x,y,cir,rd,tilt 
4500 IF a=18 THEN :EXIT loop_circle:END IF 

4510 IF a=216 THEN : rd=rd-.1:I1IF rd>1 THEN rd=1:EN 
D EF ~:END IF 

4520 IF a=192 THEN :cir=cir-1:END IF 

4530 IF a=2@8 THEN : rd=rd+.i:IF rd<.i THEN rd=.1: 
END IF :END IF 

4540 IF a=20@ THEN :cir=cirti:END IF 

4550 IF a=196 THEN :tilt=tilt+.1:1F tilt>16@ THEN 
tilt=18@:END IF :END IF 

4560 IF a=264 THEN :tilt=tilt-.1:IF tilt<@ THEN ti 
1t=@:END IF :END IF 

4579 CERCLEUX..y.,Cit, od, ba lt 

458@ NEXT loop_circle 

4599 END REPeat loop_circle 

4600 OVER @:CIRCLE «,y,cir,rd,tilt:OVER cursor_fla 


Press <= 


g 

4612 CLS#6 

4629 END DEFine 

4630 DEFine PROCedure DRAW_A_BOX 
4649 CLS#6:AT #6,0,18:PRINT #6, "Box 
ER ] to set Box" 

4659 hr=9:vr=0 

4660 REPeat loop_box 

4678 KEYBOARD_INPUT 

4680 OVER -1:LINE x,y TO x+hr,y TO xthr,yt+vr TO x, 
ytvr TO x,y 

469@ IF a=1@ THEN : EXIT loop_bax:END IF 

4780 IF a=192 THEN hr=hr-1:END IF 

4710 IF a=2@@ THEN hr=hr+1:END IF 

4726 IF a=208 THEN vr=vr+1i:END IF 

4736 IF a=216 THEN vr=vr-1:END IF 

4748 LINE x,y TO xthr,y TO xt+thr,ytvr TO x,y+vr TO 
x,y 


Gos A Tan 
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475@ NEXT loop_box 

4762 END REPeat loop_box 

4778 OVER @:LINE x,y TO xthr,y TO xthr,ytvr TO x,y 
+vr TO) x,y 

478 OVER cursor_flag 

4798 CLS#6 

4890 END DEFine 


This is the final part of our space Empire. Who said Rison never’ 
saga of mystery, suspense and repeats itself? 
intrigue spread across several 


warring camps — the Imperial before running it. 
forces and rebel fighters. 
Using largely text and adven- 
ture problems, the object of the 
game is to lead the rebel fighters 
to victory and form the second 


10110 
.¢) 


10120 pl(i)=INTC(RND(1 TO 3)) 

10130 FOR p=2 TO pl(i)+1: INK RND(3 TO 6): CIRCLE 
co(i,1),co(i,2),p, (INT(RND(6 TO 14))/10) ,RND (2) 
10135 col=col+? 

10140 END FOR i 

10150 INK 6:CSIZE 3,0:cl=49:cl$="1":OVER -1 

10160 FOR i=1 TO 29 STEP 1.9:AT 16,i:PRINT cl%s5:cl 
=cl+iscl$=CHR$(cl): IF cl=57 THEN cl=96:END FOR i 
10170 OVER O 

10180 END DEFine 

19999 ¢s 

20000 DEFine FROCedure initialise 

20010 DIM des$(15,55):DIM pl(iS):DIM co(15,2):DIM 
name$ (15,15) 

20015 DIM nami1(30):DIM cat#(30,15):DIM cati$(12,55 
¥sDIM ar(15) 
20016 DIM £(16): 
1send_g=0 

20020 RANDOMISE 
20030 RESTORE 32000 

20035 FOR i=1 TO 30:READ cat#(i):END FOR i 

20040 FOR i=1 TO 15 

20050 al=INT (RND (1 TO 30)):IF nami(ail)<>0 THEN 
GO TO 20050 

20060 nami(al)=1:name$(i)=cat$ (al) 

20070 END FOR i 
£0080 RESTORE 32030 
20090 FOR i=1 TO 12: 
20100 FOR i=1 TO 15 
20110 al=INT(RND(1 TO 12)) 

20120 des#(id=catit¢(al) 

20122 rn=INT(RND(25 TO 95)) 

S01E5 IF al#>i AND al<>7 AND al<>8 THEN ar(i)d=rne 
ELSE rn=0 

20126 £f(i)=al 

29127 IF al=4 OR ai=6 OR al=12 THEN tot_h=tot_ht+r 
mn: ELSE tot_c=tot_ctrn 

20130 END FOR i 

20135 IF tot_h*<200 THEN GO TO 20010 

20140 year=65891.74 

20150 prob=INT((100/ (tot_h+tot_c))*tot_h) 

20160 devel_h=0 

20170 base=INT(RND(1 TO 15)):IF f(base)<>1 AND f(b 
ase) <2 AND f(base)<>7 AND f(base)<>98 AND f (base) < 
29 AND f (base) <>10 THEN GO TO 20170 

20998 END DEFine initialise 

OTT: 

21000 DEFine FROCedure f_level 

21005 BEEP 1000, 5 


tot_h=0: tot_c=0: DIM dep(i5):gol= 


READ cati$(i):END FOR i 
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The game must be played in| 
galaxies and two issues. The game lower case. When you have typed’ 
is based on the popular idea of a it in, save it to Microdrive or disc’ 
galactic Empire divided into two then type WINDOW 512,256,0,0] 


INK 6sFILL 1:CIRCLE co(i,1),co(i,2),.S:FILL 


21010 FARER O:RORDER 5,5:CLS 

BiO30 INK 2,4:CSIZE 3,1:AT 0,7:PRINT “COSMIC REVOL 
UTION":CSIZE 2,0 

21030 INE 7 

21040 AT 3,2: INFUT "PLEASE ENTER SKILL LEVEL (1 TO 
4):"slev 

21050 BEEP 1000,20 

2h IF lavei OR lev>4-THEN GO TO 21010 


K 2, 47CSIZE 3, 130T O,72¢PRINT “COSMIC REVOL 

LUTION" :CSIZE 2,0 

21070 INK &6:UNDER 1:AT 2,0:FRINT "THE CURRENT SITU 

ATION: ":UNDER 0 

logo INE 4:AT 4,2:FRINT “NAME":AT 4,19:FRINT “DES 

CRIFTION" 

21090 INK 2 

21100 . 42=1 TO. 1S 

21105 =INT(i/2) THEN INK 3:ELSE INK 2 

21110 i+5,0:PRINT name (i) 

@l120° IF f¢€id}<>10 AND £(1)<>9 AND f(i)<>1 AND (i 
: AND £¢(i)<>8 AND #(i)<>7 THEN AT i+5,17:FRINT 

das$(i?:ELSE AT i+5,17:FRINT "NO INFORMATION" 


‘21140 END FOR i 


21150 INE 7:AT 23,9:PRINT "PRESS ANY KEY TO PLAY" 
21160 PAUSE 40000 

BEEF 1000,10 

END DEFine 


DEFine PROCedure end_game 
PAPER O:BORDER 5,5:CLS 
2 CSIZE 3,1:INK 2,6:AT O,1:FRINT “THE EMPIRE H 
aS BEEN RE= FORMED" 
22030 CSIZE 2,0: INK 2 
2040 AT @,2:PRINT “THE SECOND EMPIRE HAS BEEN FOU 
NDED BY" 
22045 INK 3 
22050 IF tot_h>tot_c THEN 
eee AT 10,11:PRINT “THE REBEL FORCES" 
2070 INK S:FLASH 1:AT 12,15:FRINT "WELL. DONE": FL 


END IF 

IF tat_c>tot_h THEN 

AT 10,19:FRINT "THE IMPERIAL FORCES" 
S:FLASH 1:AT 12,12:FPRINT "YOU HAVE FAIL 


221050 
SPL1i0 INK 
ED":FLASH oO 
22020 (END eTe 


R22l21 IN &:AT 16,0:PRINT “IN WHICH SYSTEM IS THE 
SECOND TOUNDATION?" 
22122 INK 4: INFUT FOUNDS 
P2123 IF names (base)=FOUND$ THEN INK 7,2:AT 19,128 
FRINT “YOU ARE CORRECT" 
22124 TF name (base) <>FOUNDS THEN INE 7,2:AT 19,4: 
FRINT "YOU ARE WRONG, IT WAS ON ";name% (base) 
22150 Ik 7sCSIZE 3,0:AT 22,2:FRINT "PRESS ANY KEY 
TO FLAY AGAIN" 
ee14O PAUSE 40000 
2150 BEEP 10000,10 
22146G IND DEFine 


2160 END DEFine 

SLor ois 

32000 DATA "Xantor", "Capri", "Alce", "Cor Caroli", "M 

enta", "Canopus", "Baltair", "Fhakt", "Rantor", "Thuban 

32010 DATA "ken Tor", "Eltanin","Danko","Zibal", "Di 

dcock’s Star", "Pollux", "Sarin", "Nihal", "Frontus"," 

Haka", "Ignata" 

32020 DATA "Sirrah Alpha", "Sirrah Beta", "Antares", 

"Qaunta", "Gigantu", "Hinter", "Janx", "Psion", "Lacert 

a" , "Optika' 

$2030 DATA "System UNINHABITED by 

eo life.", "System's INHABITANTS unknown." 
DATA’ "An IMPERIAL out post.","A REBEL out po 


intellig 


"An IMPERIAL colony.","A REBEL colony." 
"The System is devoid of all LIFES" 
"System INHABITED by low forms of life. 


T2080 DATA "System INHABITED by an intellig 
ent species.","The Whole system is internally gove 
rned." 

72090 DATA "An IMPERIAL base.","A REBEL base." 
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umber_4;" = “:AT 5,19; PRINT" ?" 
1630 AT 5,19:1INPUT answers 
1649 IF answer$<"@" OR answer$>"999" THEN GO 
TO 1620 
1650 IF answer#=number_3‘*number_4 THEN co 
rrect_marker= correct_marker+1: goo 
d_news: correct:ELSE bad_news: wrong 
Following our appeal for educa- tional programs, sO if you have 1660 fay con fe ae number 4 e7eth 
tional software, we received this written any educational software 1670 CLS 
program which helps to teach you think might be suitable, send 1682 at-DATES:end_time$=a$(16 TO 20) 


children their multiplication tab- it to The Progs. ate 1 TO 2)- time_now 


les. We are still looking for educa- 1790 time_elapsed=60+(end_time$(1 TO 2)-time_ 
now$(1 TO 2))+ end_time$ (4 TO 5)-time_now$(4 
TOSS) 
1870 MODE 8:CSIZE 1,1:PAPER 2:INK 7: 1710 fabacloornect MeEneE) 
1988 AT 5,11:PRINT"QUIZ":PAUSE 5@ 1720 AT 9,1:PRINT"You took "! time_elapsed!" seconds." 
1098 PAPER 6:INK 1:CLS 1738 STOP 
1108 PRINT’Which table <1..12>" 1740 END DEFine 
111 PRINT: PRINT"Or <A>ny table“ 1756 DEFine PROCedure correct 
1120 PRINT: PRINT“Input your choice..." 1766 AT 7,8:INK 2:FLASH 1:PRINT “Well do 
113@ PRINT: INPUT choices ne!":PAUSE 108:FLASH @: INK & 
1149 IF choice$>="1" AND choice$<= i "12" THEN 177@ END DEFine 
specific_tables (choices) 1769 DEFine PROCedure wrong 
115@ IF choice$="A" OR choice$="a" THEN any 1798 AT 7,5:INK 2:FLASH 1:PRINT "No. Wai 
_table:ELSE GO TO 1999 t for help!":PAUSE 100 :FLASH @: INK @ 
116@ REMark *** specific table *** 18@@ END DEFine’ 
1178 DEFine PROCedure specific_tables (choices 1816 REMark sound - if wrong 
118 LOCal a$,time_now$,end_time$, correct_ 1620 DEFine PROCedure bad_news 
marker ,mark,number_1, number_2 1838 FOR j=1 TO 255 
1198 DIM number (18) 1849 BEEP 590, j 
1202 a%=DATES: time_now$=a$(16 TO 20) 185@ END FOR j 
1216 correct_marker=@ 18690 END DEFine 
1220 FOR counter=1 TO 10 1870 REMark sound if correct 
1236 CLS:mark=@ 1880 DEFine PROCedure good_news 
1249 number_1=choice$:number_2=RND CL TO.47 1896 FOR j=190 TO 4@06 STEP 580 
2) 1996 BEEP 5@00,j:PAUSE 5 
125@ FOR check=1 TO counter 1910 END FOR j 
1260 IF number_2=number(check) THEN mark=1 1928 END DEFine 
:EXIT check 1930 REMark draw faces 
1278 END FOR check 1948 DEFine PROCedure faces(count ) 
128@ IF mark=1 THEN LET mark=90:GO TO 1249: EL 1958 CLS 
SE number (check)= number _2 1969 AT 1,1:PRINT"You got “;count;" of them right,’ 
1290 AT 5,7:PRINT number_1;" "; “ as 1979 increment=@: radius=7 
mbere 25). j= - vAT 5719" PRINT "?" 1988 FOR n=1 TO count 
132@ AT 5,19:INPUT answer$ 1999 CIRCLE n*radiust+li+tincrement ,69 ,radius 
1316 IF answer$<"@" OR answer$>"999" THEN GO 20@G ARC n*radius'1+tincrement- 2.6, 58 TO n 
TO 1299 xradius+ltincrement+2.6 ,oe,.PL 
1329 IF answer$=number_1*number_2 THEN co 2@1@ POINT n*radius+l+increment-2, 62:POIN 
rrect_marker= correct_marker+1: goo T ntradiust+l+increment+ 2,62 
d_news: correct: ELSE bad_news:wrouug: 202@ =increment=increment+radiust+2 
teach number_1,number_2:wait 2038 END FOR n 
133@ END FOR counter 2040 AT 5,1: PRINT" and ";18-count; " of the m wrong.” 
1348 CLS 205@ increment=@ 
1350 a$=DATES$: end_time$=a$(16 TO 2@) 2866 FOR n=1 TO 1@-count 
1362 minutes=end_times(1 TO Z)- time_now 207@ CIRCLE ntradius+l+increment, 20 »radius 
$(1 TO 2) 2086 ARC n*radius+l+increment- 2.6, 16°TO ni 
1376 time_elapsed=6@*(end_time$(1 TO 2)-time_ *radiustl+increment+2.6 , 16, —P 1 
now$(1 TO 2))+end_times (4 TO 5)-time_now$(4 2092 POINT neeadiesml taneremenes De 22: POIN 
eae ; nee T ntradius+l+incremerit+ Diee 
aces(correct_marker ne sa + iust2 
1398 AT 9,1:PRINT”You took “! time_el Os Eo ae 
apsed!" seconds."! 2120 END DEFine 
1480 STOP 2130 DEFine PROCedure teach(ni1,n2) 
1419 END DEFine 2148 CLS:CSIZE 9,9 
142@ REMark *** Any table *** 2158 AT 1,1:PRINT"To work out "!nl1! 
1430 DEFine PROCedure any_table 1". ". PRINT 
144@ LoCal a$,time_nows,end_time$, correct_ 2168 FOR j=1 TO nl 
marker ,mark 2170 FOR k=1 TO n2 
1459 DIM n3(10),n4(1@) 2180 PRINT "x"; 
1460 a$=DATES: time_nows=a$(16 TO 26) 2199 END FOR k:PRINT 
1479 correct_marker-= 4 2208 END FOR j 
1482 FOR counter=1 TO 19 2210 AT 5),.17: PRINT" There are ";n1:AT 6,17:PRI 
1499 CLS NT“ lots of SNe ee esis AT 7,17: PRINT"I£ you 
1588 number_3=RND(1 TO 12) count all" 
1519 mark-8 2226 AT 6,17:PRINT"the stars, you":AT 9,17: PRI 
1520 FOR check=1 TO counter NT“will find that":AT 12 ,17:PRINT"there are " 
1530 IF number_3=13(check) THEN mark=1 jnl*n2:AT 11,17: PRINT" of them." 
:EXIT check 2230 AT 12,17:FLASH 1:ERINT" So: ":AT 14,17: UN 
1546 END FOR check DER 1:CSIZE 2,1:PRINT nl toe sin2s = mene 
1558 IF mark=1 THEN LET mark=@:GO TO 1506: EL -FLASH @: UNDER @: CSIZE. 9, 
SE n3(counter )=number_3 2248 AT 17,17:PRINT"Press any key. 
1568 number_4=RND(1 TO 12) 2258 CSIZE 2,1 
ne aed asia ait 2268 END DEFine 
check= counte F ‘ 
1599 IF number_4=n4 (check) THEN mark=1 pO ee oaae ape 
:EXIT check 2290 REPeat loop 
1608 END FOR check 2300 a$=INKEYS 
161@ IF mark=1 THEN LET mark=@:GO TO 1560: EL 2310 IF at<>"" THEN EXIT loop 
SE n4(counter )=number_4 232@ END REPeat loop 
1626 AT 5,7:PRINT number_3;" "; Seg S25 0 2330 END DEFine 
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QL-related hardware, 


software and service 
index 


HARDWARE 


ABC Electronic 

010 49 521 890881 

Mouse 

Astracom 

0792 473697 

Modem 

Cambridge MicroElectronics Ltd 
0223 314814 

Q-Prom Eprom Programmer 
Care Electronics 

0923 672102 

Phillips and other monochrome monitors 
Chromagraphica 

04012 4699 

High resolution monitors 
Commpak Data 

0792 473697 

Astracom 1000 

Computer Supplies 

146 Church Road, Boston, Lincs. 
Joysticks 

Compware 

0270 582301 

Disc Drives, Memory, Monitors 
CST 

0438 352150 

Thor, Qdisk/IEEE Interfaces, Drives, RAM, 
Winchester, Eprom Programmer, Q +4 
Cumana Ltd 

0483 503121 

Disc Drives/Interface 

Data Distributors Ltd 

0990 28921 

Kaga, Sinclair Vision 

Datalink 

031 554 6040 

Printer Interfaces 

Eidersoft 

0708 851099 

QL Mouse, Disc Drives 
Farmintel Ltd 

0234 219814 

QLT, Disc systems, SuperQboard, RAM boards 
Tony Firshman Services 
01-267 3887 

Mains Spike Filter 

4 Systems 

01-844 1399 

Hardware and Software 
Kempston Ltd 

0234 856633 

Disc/Centronics Interface 
Management Science Itd. 

17 West Hill, London SW18 

QL Case 


MICRO 


Abs 


HARDWARE | 


Micro Peripherals Ltd 

0256 473232 

Disc Drives/Interfaces 
Microworld 

0293 545630/0273 6711863 
Printers and Monitors 

Miracle Systems 

0272 603871 

Expanderam 512K 

Modem House 

0392 69295 

Opus Supplies Ltd 

Redhill 65080 

PCML Ltd 

0372 67282/68631 

QL & RAM cards. 

Penman Products Ltd 

0903 209081 

Penman plotters 

Printerland 

0484 514105 

Printers 

Silicon Express 

0533 374917 

Disc interfaceldrives, Centronics interface, 
RAM boards, Monitors, Printers 
Slave Software 

050 846 8866 

Q Disc 

SMC Supplies 

01-441 1282 

Joystick Adaptor, Centronics and Epson 
Serial 

Strong Computer Systems 
0267 231246 

Printers and Monitors 

T.K. Computerware 

0303 812052 

Stockist 

Tandata 

06845 68421 

Q-Connect, Q-Mod, Q-Call 
Technology Research Ltd 
0784 63547 

Disc interface with RAM and Centronics port 
Transform Ltd 

089 283 4783 

QI dust cover, Microdrive. storage box RS232 
lead, disc drives, monitors and printers 
Viglen C\ mputer Supplies 
01-8112 9902 


ABC Electronic 

010 49 521 890881 

Giga — Basic 

Adder Publishing Ltd 
0223 277050 


SOFTWARE 


Q_ Doctor, Macro-Assembler, Advanced 
User Guide 

Anglo Services Ltd 

0705 671421 

Eprom Programmer 

Ark Distribution 

01 863 1861 

QL/IBM Compatible Cardfile, Mailfile and 
Librarian 

Breakthrough Sofware 

0763 45482 

Multi-Tasking Print Spooler, on-line 
SuperBasic Manual 

Bridgebrook Intek 

45 Burleigh Avenue, Wallington, Surrey 
Bank Manager, Diary Manager, Thought 
Manager 

Business Software 

01-863 1861 

Cardfile, Mailfile, Librarian 

Camel Products 

0223 314814 

Q-PROM Eprom Programmer 

Collins Soft 

Freepost, 30, London WIE 7JZ 
Decision Maker, Entrepreneur, Project 
Planner 

Compugem Ltd 

01-731 7948 

Master Blaster 

Computer One 

0223 862616 

Pascal, Forth, Assembler, Typing Tutor 
Monitor|Disassembler 

Compware 

0270 582301 

Retail, SuperBasic extensions 
Consumers Association 
Subscription Dept, PO Box 44, Hertford, 
§G14 1SH 

Taxcalc (on subscription) 

CP. Software 

10 Alexandra Road, Harrogate 

Bridge Player 

D. A. Bandoo 

81 Mount Pleasant, Wembley 
Assembler, Screen Editor 

D. J. Walker 

22 Kimptons Mead, Potters Bar, Herts EN6 
3HZ 

QLIOPD File Transfer 

D. S. Enterprises 

01-671 0209 

Sign Designer, RAM disc software 

Data Management 

0904 760351 

Sbutil, Mbackup, Terminal, Chargen, 5B 
Extras, FM 

DataGEN 

0989 67469 


Packages for solicitors, accountants, video 
libraries, double glazing sales & credit 
conirol 

Datalink Systems 

097081 360 

CAD PAK, 3D Slime 

Datalink U. K. 

031 554 6040 

Ser/Par converter, Printer Lead, Joystick & 
Adaptor 

Digital Precision 

01-527 5493 

QL Super Sprite Generator Games Designer 
Monitor & Dissambler, QL Super 
Backgammon 

Eye-Q, Supercharge, Super Media Manager, 
Superforth, Super Astrologer, Professional 
Astrologre, Reversi, Arladia 

D. J. W. Software 

11 Pound Close, Bramley, Hampshire, 

RG26 SBL 

Joysticks 

D. R. K. Products Ltd 

Bar 1, Pipers Lane, Markyate, St. Albans, Herts 
AL3 8QF 

Micro Cartridge Rack 

D. S. Enterprises 

01-671 0209 

Retailer, Sign Designer, RAM Disc 
Eidersoft 

0708 851099 

QL Art, Zapper, QSpell, Archiver, BY IT & Il, 
Citadel, Spook, Ice, Integ Accounts, Karate, 
Choice, Artice, Toolkit, Presenter 

Eigen Software 

45 Bancroft Road, Widnes, Cheshire WA8 OLR 
Gobble Gobble 

English Software 

061 835 1358 

Hyperdrive 

Eprom Services 

0532 667183 

Ser/Par converter, Eprom cartridgelsoftware, 
cables 

Equate 

2 Ffordd Derwyn, Penyffordd, Chester CH4 
QT 

Calendar. Draughts, MI_F_OR, Mined Your 
Path, Snake, Solar Invaders, Wall Breaker 


Gemini Marketing 

0395 265165 

Life/Business Organiser, Executive Adventure 
G. S. T. Cofmputer Systems 

0954 81991 

QOL Assembler, 681K/OS, Macro Assembler, 
QL C Compiler 

Hisoft 

0582 696421 

Mon QL, Devpack QL 
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HARDWARE 


Intek Software 

01-500 8534 

Maxim 

J. & D. Software 

3 Alfred Road, Lowton, Warrington 

Key Software 

0703 695182 

Flight Simulator, Early Learning 
Labochrome 

173 Rue De Fragnee B-4000 Liege, Belgium 
Baron Rouge, Gwendoline 
Management Science Ltd 

17 West Hill, London, SW18 

Travel Case 

Maurice Computers 

Apartment 6, St Maurices House, 

36 Heworth Green, York YO3 7TA 

QL Stockmarket Investor 

McGraw-Hill 

0628 23431 

68000 Assembler Language Programming 
MetaComCo 0272 428781 

Macro Assembler, BCPL, Lattice C, 
Cambridge Lisp, ISO Pascal, APL 
Microprocessor Engineering Ltd 
Hanley Road, Southwater, Horsham, Sussex 
QL Terminator, Emulator : 
MicroApl 

01-622 0395 

Microdeal 

0726 68020 

Lands of Havoc, Hopper, Cuthbert, Crazy 
Painter. 

The King, Aquanaut 471, QL Flight 
Mict_A_Soft 

0204 29643 

Design Board II, Q Print, Art Master, Las 
Vegas 

Miracle Systems Ltd 

0272 603871 Ex210 

ExpanderRAM, Modaptor, Ser1/Par 
converter, Joysticks, RAM disc, screen dump 
N. Alexander 

53 Allen Road, Wolverhampton, West 
Midlands 

C Library 

New Horizons Software 

Fourwinds, 30 Cwm Lane, Rogerstone, Gwent 
Chomper, Zfred, Golf, Stranded, Collector, 
Football, Breakout, Programs 1,23 

Owl Computer Training 

044 282 7302 

Business Training Courses 

Paddy Software 

0726 832718 

Q REVision, Q_PHYS, Q_ CHEM, Q_HIST, 
Q_VERB 

Palantir Products 

60 St Lukes Road, Bedminster, Bristol 
Inkwell (font editoriprinter utility) 


Corrupted masters? What are they! 


QL BACKUP SUITE V5.1 


New Byte/byte mdv duplicator. 4 mat with password, transfer files to mdv/flp/fdk. 
View mdv map detect invisible files, dates & file len. Swap strings in file. Use 
relocatable EPROM’s from mdv. + “Fancy” window editor. 100k+. 


£9.95 to Steve Jones 


ZITASOFT 
93 FOXBOURNE RD, LONDON SW17 8EN 


PS Doctors & NURSES coming soon!! 


PCS 


8 Oakgrove Way, Bridgewater, Somerset 
PCS Utilities 

PCML Ltd 

0372 67282 

Q+ Disc Systems and RAM boards 
Peakcrown Ltd 

4 Beeby Road, Scraptoft, Leicestershire LE7 
9SG 

Squadrons 

Peak Electronics 

32 Clifton Avenue, Hartlepool, Cleveland 
QL Colour Quest 

Plantir Products 

60 St. Luke St, Bedminster, Bristol 
Ink-well 

Portfolio Software 

PO Box 15, London SW11 

Position Computing 

0554 759624 

Hi-Res Screen Dump 

Prentice Hall 

0442 58531 

The C Programming Language 
Printerland 

0484 513105/687875 

Psion Chess, Metacomco Assembler 
Prospero Software 

01-741 8531 

Pro Pascal, Pro Fortran-77 

Psion 

01-723 9408/0553 

Quill Abacus, Easel, Archive, Psion, Chess, 
Organiser 

Pyramide 

01-349 2794 

Wanderer, Neucleon, Othello, Mortville 
manor, Vroom, QL Peinire 


QCode 

0235 28359 

QCode Terminal, Modaptor, Modem, 
Assembler, RAM disc, Games 

Qflash 

Hamburg 6512742 

RAM Disc 2.4 

QJump 

0954 50800 

QEP III Eprom Programmer, QTK II Super 
Toolkit, QMON Monitor, QRAM Utilities, 
QFLP Upgrade 

QSoft 

01-559 7417 

Agenda Diary 

Quest 

04215 66488 

Business Accounts, Cash Trader 
Realtime Software 

0532 458948 

Knight Flight 


Rubicon Mailing List, Stock Control, Diary, Qspell, 
0742 583665 Calculator, Switch, Toolkit, Archive 
Dragonhold Programming, Payroll, Sage Accounts, key 
S. & B. Software Define, Tropic Software 

20 St Nicholas Street, Diss, Norfolk Tropic Software 

Fantasia Adventure 09274 27497 

Sector Software Bongolia Escape 

45 Cheetham Meadow, Moss Side, Leyland, Virgin 

Lancs PR5 3UB 01-727 8070 

Shadow Games Try 0296 668740 QL Scrabble 

Paint Master, Area Radar Controller. Space WD Software 

Paranoids 0534 81392 

Guard and Galactic Invaders, Night Nurse, WD Morse Tutor, REF QL 7 

Blast Buggy, Quazimodo, Star Xenon 

Slave Software 24 Wharncliffe Street, Barnsley, West 

050 846 8866 Yorkshire S70 6BP 

Arable Farmer Software Poolswinner version 2.0 

Smiling Software ZitaSoft 

26 Dale Road, Marple, Stockport SK6 6HA Steve Jones, 93 Foxbourne Road, London 
Toolkits (for Icons, Characters, Games) SW17 8EN 

Software Atelier QL MDV Backup 3.0 


POB 148/8002, Karakoy, Istanbul, Turkey 
Project Management, 3D Space Trusses, 2D 


Rigid Frames Computer Repair Centre 
Software 2000 0379 52588 

Oxford House, 258 Garstang Road, Preston OL Repairs 

PR2 4QB Data Printing Services 

VI52 Emulator, Textronix/WestwardlVT52, 25 Seymour Road, Bath, BAl 6DY 
Utilities Print Quill Documents Dot|Daisy 
Solent Systems : Owl Computer Training 

0983 865694 044 282 7302 

Tasword to Quill transfer Business Training Courses 
Stevenson & Partners Quanta 

0428 51500 0908 564271 

Integrated Maintenance Planning|Stock Quanta (Independent OL User Group) 
Control Rainbow Repairs 

Strong Computer Systems 0904 768853 

0267 231246 OL Repairs 

Retailers, Astrocom Modem, QCAD Graphics Zedem Computers Ltd 

Super Plant Software 0234 213032 

097 423 223 QL Repairs 

Plant and gardening software 

Swansoft 

164 Vicarage Road, Morriston, Swansea, 

Space Trek 

Talent Computer Systems 


041 552 2128 
Skul, West, Graphic QL, Lost Pharoh, 
Asembler/Workbench, Cartridge Doc 


This month Instant Access 
has been updated to provide 
a comprehensive guide to 


eae Ltd software, hardware and 
0272 742 796 services available for your QL. 


From next month it will be 


USED Pascal, USCD Fortran 77, Advanced : 
is foe replaced by a more detailed 


Development Toolkit, USCD P-System, USCD 


Prolog guide to QL products and 
TR Computer Systems services. In this way we hope 
093 924 621 to keep readers even better 
QL Payroll informed of what products 
Transform Ltd are available and who 

01-658 6350 supplies them. 


*** U.S.A kk 
We have purchased the complete American inventory of 
American QLs from Sinclair Research and now hold the sole 
distribution rights. 
We are looking for hardware and software products for our 
dealers in the U.S. 


A + COMPUTER RESPONSE 

69B ISLAND ST., KEENE N.H. 03431 U.S.A. 
Tel: (603) 357 1800 

Telex. 6502946407 via MCI/WUI 

(Western Union International) 


AMERICAN DEALER ENQUIRIES WELCOME 


TO BOOK 
THIS SPACE 
CALL 


TRUDI EVANS 
ON 
01-222-9090 


STOP LOCK-UPS AND DATA CORRUPTION 


If this is due to mains interference then our plugs may be the answer 
As well as cutting high voltage spikes they smooth the cut spikes and filter 
FF interference from 1 to 30 MHZ (better than 30db) and up to 130 MHz. 
Some customer comments: 
“With the cleaner ... (locking up) ... is no problem now” — Electrical engineer. 

.. these computer Cleaners work” — Computer user group. 

. the device is the answer ... (loading problems)” — BBC owner. 
“ooh ups are cured” — Golf Club QL. 


ADAPTOR — 1 three pin socket 
ADAPTOR - 2 three pin sockets .. 
TRAILING 4-WAY SOCKET ......... 


Simply plug in — no wiring required. 
TONY FIRSHMAN SERVICES 
43 Rhyl Street, London NW5 3HB. 01-267 3887 


Q U A NTA 66% OFF RIBBONS 


Why pay £££s for a new fabric ribbon 
cassette when we can re-ink your old one 

The ageamirmy QL users group 
* monthly newsletter (36/40 pages) 


at A THIRD OF THE PRICE? 
Post cassette, stating printer make and 
* free advice % tutors (Archive etc.) model and enclosing one third of the price 
* massive software library (mostly free) of a new one 
* supports for local groups 
* printer hotline 


(minimum £1), to: 
Further details from Brian Pain, 24 Oxford St, Stony Strat- ALADDINK, (Dept. QL), 4 Hurkur Crescent, 
ford, Mitton Keynes, MK11 1JU Tel: (0908) 564271 


Eyemouth, Berwickshire, TD14 5AP. 


.. £14 inclusive 
£18 inclusive 
.. £24 inclusive 


%* workshops 


PROFESSIONAL PROGRAMS FOR BUSINESS USERS OF 


SINCLAIR QL 

PROJECT MANAGEMENT PROGRAM - Critical Path Method based program providing the User Project 
Management Tools for Time Study, Cost Study, Project Feasibility, Cash Flow, Profit/Loss Evaluation, Bar 
Chart, Manpower Utilisation, Progress Payment Computations. 
3D SPACE TRUSSES - Statical Analysis Program computing Member Forces, Support Reactions, Defiections 
under Multiple Loadings, Superpositions of Loadings to evaluate unfavourable loading conditions, 
2D RIGID FRAMES or TRUSSES - Statical Analysis Program computing the same magnitudes as for 3D 
but for 2D Frames of flexural Members or for 2D Trusses. 

Please write for free information: 


SOFTWARE Atelier, POB 148, 80002 Karakoy, Istanbul — TURKEY 


SHADOW GAMES IM\ it 
Our comprehensive range of top-selli jes are available through em 
renee ofp pss EGA-lOQ0LHIT 
FULL FILE HANDLING INCLUDING 
RANDOM ESS INF INPUT, OUTPUT & 
OVERWEITE Fice ARI 
DE FAULT D TECTORIES, ae asiina 
SP OGRAMMABLE FUNCT. 
REVS Se JOB CONTROL, 
SKING CLOCK cic. etc. 


|-packed: 
t £14.95, for a limited time 
only, the Incomparable: PAINT. MASTER, 
New titles will soon be announced. WATCH THIS SPACE! 


Good programmers are always in demand. ve us publish your game 
or utility. Write for detal 


SHADOW GAMES, 1/2 = Cottages, 
Maidenhatch, Tidmarsh, nr Reading, 
Berks RG8 8HP 


® DRAFT DOT MATRIX 
@ NEAR LETTER QUALITY 

@ SUBSCRIPT SUPERSCRIPT 
®@ CONDENSE EMPHASIZE 
@96 CHAR+48 EURO+16 MATHS 
@®EPSON/IBM GRAPHICS 
® OPTIONAL TRACTOR 


ROCK HALL LIMITED 
128 STATION RD, GLENFIELD. 
LEICESTER LE3 8BR. 


TEL ‘0533 313531. 
TELEX:341100. 


a 
QL ‘C’ PROGRAMMERS 


a aries for use with Metacomco's Excellent 'C' compiler. 

1, CSCREEN: The original library of 24 routines as sold worldwide including: 
DATE/PAPER/INK/STRIP/SAVESCR/RESTSCR/WINDOW/BLOCK/PAN/SCROLL etc. etc. 
2.BIGLIB: Containing all the routines of CSCREEN but totally rewritten to be faster and smaller 
PLUS: CIRCLE/LINE/POINT/SCALE/ARC/FILL/MODE/BEEP/FLASH/MYPRIORITY/ all in 1.5k. 
Yes thats less than the 1.7k of CSCREEN! 

PRICES CSCREEN £10,00, BIGLIB £20.00 


All supplied on UNPROTECTED Microdrive kcart/3.5in. disk (DS/DD) with full easy to use documentation. 
Note: BIGLIB is available as an update to buyers of CSCREEN at £12.00 + Blank Cartridge. 
All Orders: Add £2.50 if required on 3.5in. disc. Add 2.00 for Overseas Air Mail. 
N. Alexander 


22 Hatfield Road, Margate, Kent, CT9 5AT. 
All Cheques/P. 0" 's Payable to N. Alexander 


NUMBER ONE FOR QL REPAIRS 
FIRST STOP PAST THE END OF YOUR TETHER! 

Do your microdrives spin on forever? 
Does your keyboard ignore you? 
Then call Rainbow Digital Repairs for 
prompt, professional service. 
Prices range from £17.00 for a keyboard 
problem; to a maximum of £37.50 for 
some microdrive problems. 


nes 
mm ww 


Clark House, Haxby 
York, YO3 8HU 

Tel: (0904) 768853 
24 hour answer service 


All prices include VAT, Postage and 
packaging & insurance. 


24hr courier return 
service available. 


Overseas enquiries welcomed. 


QL STOCKMARKET INVESTOR 


powerful aid to personal investment analysis 
*CALCULATES COMMISSIONS, END-COSTS, PROFITS, IDENTIFIES LOSSES. 
*TRADITIONAL AND TRADED OPTIONS. ACCOUNT TRADING. 
*DATABASE STORAGE OF PORTFOLIO HISTORIES — EASILY UPDATED. 
*ALLOWS IMMEDIATE ANALYSIS OF PORTFOLIO PERFORMANCE. MENU DRIVEN. 
Available only for the QL at £19.95 including instructions and p&p. 


QL SPRITE ANIMATOR 


A utility to create moving and animated sprites 


*ENTIRELY IN ASSEMBLER, PRODUCING THE SMOOTHEST SCREEN MOVEMENTS. 
*EASILY USED AND CONTROLLED FROM ORDINARY SUPERBASIC COMMANDS. 
*UP TO 64 ‘FRAMES’ CAN BE STORED AND PLAYED OVER FOR ANIMATION. 
Provided with instructions and example programs at £9.95 inc. p&p. 


MAURICE COMPUTERS, Brookside, S. Kilvington, Thirsk, N. Yorks. YO7 2NL 


ARCHIVE NOT FAST ENOUGH 
NOT ENOUGH CAPACITY? 


Using the C programming language and BTree techniques | 
can convert your Archive applications into stand-alone pro- 
grams that run much faster, with virtually no limitation on 
the number of records (files up to the size of the storage 
medium). 
Demonstration programs available on disk or Microdrive. 


L. F. HELLER, 
65 Flanders Mansions, Flanders Road 
London W4 iNF Tel: 01 994 7976 


These are friendly, i 


CARDFILE 
MAILFILE 
LIBRARIAN 


Please include your QL’s 


independent, comprefiensive and professional database management system: 
Time Module for Archive file compatability and machine code for speed 

Personal, company and mail addresses with a general notes section. 

128K QL (44 fields)£14.95: 256K QL (44/18/8 fields) £19.95 

General details, mailing address and over 900 characters of notes. 

128K QL (25 fields)£14.95: 256K QL (25/21/8 fields) £19.95 


Far too many features for one line of explanation! Please call. 
128K QL (25 fields)€19.95: 256K QL (25/14/8/4 fields) £24.95 
on your Mail Order or with your SAE for details. 


QL POOSWINNER VERSION 2.0 


PROVED MASENE DATABASE Poe 2 


pon mn. 
SUCCESSFUL We guarantee that POOLWINNER performs co ‘considerably better 
than chance. If you can prove otherwise we shall 
* UNIQUE The prediction Formulae calculates the Bas of every team 
and past results — but no tedious typing. We have yet to see 


is Using the Psion Run 


ARK DISTRIBUTION, 62 MANOR WAY, NORTH HARROW, MIDDX HA2 6BY (01-863 1861) 


OPD/QL FILE 
INTERCHANGE 


Give your QL the capability of reading and 
writing files on microdrive cartridges that 
are in the format used by the ICL OPD (and 
the Merlin TONTO. Transfer XCHANGE and 
SuperBasic files between the OPD and QL. 
Available for £15 inc. P&P from: 
D. J. WALKER, 22 Kimptons Mead, 
Potters Bar, Herts EN6 3HZ 
or send SAE for full details. 


PROFESSIONAL REPAIRS 
Home Micro Service Centre 
Sinclair QL Repair ...... 
16K to 48K Upgrade .. 
RING 0234-213032 
» Av 3-4 day turnaround 
* 6 month warranty 
x Free telephone diagnostic service 


ZEDEM COMPUTERS LTD 
2 Kimbolton Road 
Bedford MK40 2NR 
(Trade and overseas enquiries welcome) 


Your Complete Sinclair Stockist 


Hardware, Software, Peripherals, 
Printers, Books, Magazines, Accessories 
P.O. Box 5607 e Glendale, AZ 85312-5607 U.S.A 
1-602-978-2902 © Telex (via WUI): 6501267701 
DEALER INQUIRIES WELCOME 


QL REVISOR £14.50 QL 
STUDENTS, BUSINESSMEN, TEACHERS, TRIVIAL PURSUERS 
Create your own personal set of revision files, Shestined) to your requirements. Everybody knows how tedious it can be revising for 


exams, learning essays, or that important sj 


enables you to group together all the relevant facts and review them 


speech. 
regularly without having to plough through the pages of a text book or hastily scribbled notes. 


Pages can be created in the following formats:- 


A block of text: a single keypress blanks sections of the screen, another restores the text (line by line, in sections, or completely) 


until you are sure you have engi it. 
ice 


Multiple Choice Questions: select the answer from up to five choices, the QL tells you if correct. Option to store explanation of 
answer. it may be obvious sae you type it in but not so obvious days before the exam. The order of answers to each question can 
be jumbled for each viewing, ensuring you really know the answer. ideal for past exam papers. 
Questions/single answers: After displaying questions a single keypress reveals the answer with optional explanation. 

Questions and text can be intermixed and pages can be viewed in order or at random. Quick and easy editing with on-screen 
instructions at every stage. Files can be saved/loaded to any device, merged with existing text, exported to Quill and can be linked so 
that auto-run one after the other. A design command (like Quill) alters windows, character size etc. 


Menu driven 100% multi-tasking machine code. 


Please send cheque or postal order payable to: 
DIGITRIX 
Wishingtons, Porkellis, Helston, Cornwall. TR13 OLB 
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Hugelstrabe 10-12 48Bielefeld West German 


Tel 0521/890381 Telex 932 974 budde d 
GIGA Soft Mouse Set Giga Soft QSound & QPrint 


The Giga Soft Mouse comes in a ready-to-use package 
including a very high quality mouse, an interface for the 
joystick port of the QL and a software package. 


Features: 3-channel AY 3 8910 Sound IC with lots of 
sound commands. Includes Interrupt-Sound-Queues 
with up to 4k of. sound information per channel, 
envelope control, noise control etc. 

Supports a Centronics-compatible parallel printer 
port. (device name PAR_). You can chose between 
unbuffered output (very fast) or buffered (buffer size 
selectable up to 32K, interrupt driven, prints even 
when microdrives are running — immediate response 
to STOP however). Suite and Supercharge: 


The software consists of the following programs: 


i] a 
Giga — Basic 
(Tested in QL User 1/86 p-58) 
(Tested in Sinclair User 6/86) 


A totally new type of Basic extension for the SINCLAIR QL. It adds more than 70 
new commands to SuperBasic. Features: 


» Full mousecontrol from Superbasic » Programmable function keys : 2 
» Easily programmable MACINTOLSHstyle » User friendly full screen text editor Price £69.95 from D.P.* inc. VAT & P. & P. 
pull down menus with 20 functions [e) [e) H 1 i 
» Very sophisticated sprit animation » Commands to program real windows OR DM200 + 15 %o VAT ie 10% airmail post if 
commands with automatic reference of r equired) 
Fully supercharge compatible background 


Giga Chrome 


E. A. S. E. 


The new MACINTOSH style desktop 


Easily Applicable System Environment 
» E.A.S.E. is completely mousedriven. 
» E.A.S.E. supports real pulldownmenus. » E.A.S.E. gives you fill I/O control, all 


Pull down menus 
, Icon driven. 
|. Cursor controlled 


» E.A.S.E. can work with up to 7 real functions can easily be accessed by 1 

windows. using the mouse Mouse controlled 
» E.A.S.E. has an inbuilt scientific calculator » E.A.S.E. windows can be scrolled : 
Price (complete mouse + Giga Basic + and moved accross the screen. The Handles up toa 


E.A.S.E.) £89.95 from D.P.*inc VAT&P.&P. thesizeofawindowcan be 
OR DM 250 + 15% VAT (plus 10% airmail changed by using the mouse. 
postif required. 


complete A4 page. 


Austria 

ABO10 Graz 

Belgium Wim de Bont, Opdorstraat 37 
B 2910 Malderen-Longerzell 


Firma Zupan GmbH, Mandelstrabe 23 oe 
Price £34.95 from D.P.* in VAT & P.&P. OR 


DM100 + 15% VAT (plus 10% airmail post 
if required) 


France Bonnefoy Elektronic Other features: 
7 Rue de la Republique * Undo, % Character % Designer 
F 26300 Bourg de Peage me Editor, % Extensive Block-handlingy 
i i con functions: 
io sage WeiicadGaaeeen ahode Pencil, Rubber, Gum, Paint Brush, Paint-Roller, Spray Tin, 
Island 02840 Text, Lines, Boxes, Circles, Triangles, Ellipses and Lenses. 
Italy Spem Di Masoero Gudio, The program needs at least 128K RAM-expansion. 


Free with Giga-chrome Spectrum-to-QL screen converter 
available on cartridge and on 31%” disk 
NEW GIGA SOFT KEYBOARD 


AVAILABLE NOW!! 
PLEASE WRITE OR CALL FOR FURTHER DETAILS 


Via Ponchielll 26c, 1 10100 Torino 

Dr. A. Tamburello Distaco SRL 

Via Poggio Moiano 34/c 1 00199 Roma 
U.K. Digital Precision, 220 The Avenue 
London E4 9SE 


Send YOUR ORDER to: ABC Elektronic Hiigelstrabe 10-12 4800 Bielefeld 1 West Germany 
“or in the U.K. to Digital Precision, 222 The Avenue, London E4 9SE Tel: 01-527-5493 


Item Price NAME: 
ADDRESS: 
POSTCODE: 


Tick as Cash on delivery only in 
| enclose cheque/PO payable to ABC [ad Digital Precision appropriate Europe (not aL . U.K.) 


VROOM £14.95 

A new challenging car race for the QL 
with fast colour graphics and real racing 
circuits! 

Another HIT for Pyramide 

* Sinclair User — July 1986* 


PYRAMIDE 


PYRAMIDE Gower |Z 
SOFTWARE , 
PRESENTS: 


Beautiful 3-D representation of the board. 
9 levels of play. Your Move! Watch out.. 
You would be hard pushed fo find a 


BETTER VERSION of Othello ON ANY MICRO. 
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OTHELLO £14.95 


For the first time, a i i is . 
certainly anotner 
game which uses notch up for QL software 
the full power of the — and an excellent start for 
QL spatial effects, Pyramid”. 
combined with fast icici 
animation. The 29 March - 2nd April, 1986 
object will leap out Sinclair User Classic 


of the screen OOO 


£19.95 


MORTVILLE MANOR £19.95 
MYSTERY ADVENTURE GAME 


Begin your investigation in 
a setting consisting of 
more than 85 full colour 
screens. The greatest 
danger of Mortville is its 
deadly charm; a house 
‘calm’ in the eye of the 
storm. The first real graphic 
adventure for the QL! 


Supplied on two 


£14.95 


@L-Peintre combines the best of all worlds: 
ICON DRIVEN — for fast selection of main options; 
HELP WINDOW = on-screen instructions at every stage. 


Zone fill Al iO} Circle/Ellipse 
Aerosol ‘a 4 sided shapes 


Brush 


Line/Arc IN ; 7 Eraser 


The best value-for-money graphics package 
for the QL! 


NUCLEON — A UTILITY PACKAGE WITH DRAWING, MUSIC, WINDOW, 
ICON, TEXT £19.95 


A valuable “Programming Assistant”! 

This software comprises a suite of programs and tools (on two microdrives), designed 
to reduce the labour involved in producing professional results in your own creations. 
The four main programs all generage AUTOMATICALLY their own SuperBasic programs. 

, Compact Draw = Superb drawings, created and edited on screen. When you have 
finished, a SuperBasic program is generated, that will re-draw thepicture! Includes all 
_. the features you would expect from a professional design package. 

Font Definer—A very easy-to-use font definer, that allows you to design all types of new 
character sets for the QL. 

Windows — A utility that will give your programs a smart professional look, by custom 
designing your screen-display. Create and adjust windows on-screen, anywhere, any 
size, any colours, shadows, borders, etc.! This program is icon-driven for ease of use. 

| Maestro — Want to give your programs a little more musical appeal? Finding the 
unpredictably tricky BEEP command more trouble than it’s worth? Maestro could be the 
answer. Features a two octave pitch range, icon-driven composition, notes displayed 
on standard musical staves, functions of insertion, deletion, etc. 


PYRAMIDE ORDER FORM 


[-] MORTVILLE MANOR £19.95 
[-] QL PEINTRE £14.95 
[_] OTHELLO £14.95 


AVAILABLE BY MAIL ORDER. ENCLOSE CHEQUE/P.O. MADE PAYABLE TO: 
RIO PROMOTIONS LTD. Dept QL, 28 Waverley Grove, London N3 NPX. Tel: 01-349 2764 
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